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汉字 输入 方法 
一 让 你 的 名 字 显 示 在 电视 屏幕 上 


- 经 过 一 些 练 习 ， 您 应 该 能 顺利 地 输入 各 种 英文 字母 、 数 字 和 符号 了 ， 但 对 于 我 们 中 国人 ， 更 
需要 掌握 的 是 怎样 输入 汉字 ，, 因为 我 们 时 刻 都 在 和 汉字 打交道 , 操作 计算 机 时 也 常常 要 用 到 汉字 ， 
像 输入 自己 的 名 字 、 学 习 英 语 等 。 

目前 我 们 所 使 用 的 汉字 一 般 都 在 几 千 个 左右 ,其 中 有 3755 个 汉字 使 用 频率 最 高 , 它们 组 成 了 
一 级 字库 ， 还 有 3008 个 不 很 常用 的 ， 组 成 了 二 级 字库 。 计 算 机 中 一 般 都 有 --、 二 级 字库 ， 共 6763 
个 汉 池 。 

这 么 多 的 汉字 ， 想 用 只 有 几 十 个 到 一 百 多 个 键 的 键盘 直接 输入 ， 可 不 是 件 容易 的 事 。 人 怎样 用 
英文 键盘 输入 汉字 ， 一 度 成 了 世界 难题 。 一 大 批 专家 夜以继日 地 研究 ， 终 于 解决 了 这 一 难题 ， 由 
此 诞生 了 各 种 汉字 输入 方 尖 ， 目 前 使 用 的 较 普 遍 的 有 全 拼 、 双 拼 、 五 笔 字 型 等 。 裕 兴 电 脑 上 已 安 
装 了 “区 位 ”“ 全 拼 ”"“ 双 拼 >"“ 五 笔 字 型 ”等 多 种 输入 方法 ,它们 都 能 输入 汉字 ,各 有 所 长 ， 您 
可 以 选 一 种 较 喜 欢 的 方法 输入 汉字 。 


二 ”区 位 输入 法 

我 们 先 看 看 区 位 输入 法 是 怎么 回 事 : 

六 和 干 多 个 汉字 被 分 为 16 一 87 共 71 个 区 ， 其 中 每 个 区 又 包括 0 一 94 共 94 个 位 。 一 个 “区 位 
码 ” 由 四 个 数字 组 成 ， 其 中 前 两 个 数字 表示 区 ， 后 两 个 表示 位 。 如 : 区 位 码 1601， 它 表示 的 是 第 
16 区 的 第 一 位 ， 代 表 一 个 汉字 “ 啊 ”。 这 样 ， 六 千 多 个 汉字 就 可 以 用 六 千 多 个 区 位 码 来 表示 。 

候 怎样 用 区 位 输入 法 输入 汉字 呢 ? 

我 们 以 输入 汉字 “ 裕 ” 为 例 ， 介 绍 区 位 输入 法 的 步骤 : 

GD 按 下 “F1” 键 ， 屏 幕 左 下 角 立 刻 显示 出 “区 位 ”字样 ， 表 示 进 入 了 区 位 状态 ; 

@ 从 《区 位 表 》 上 找到 “ 裕 ” 字 的 区 位 码 是 “5203”; 

轧 输 入 这 个 数字 “5203”; 屏幕 上 立刻 会 显示 出 一 个 “ 裕 ” 字 。 

曲 可 以 按 以 上 步骤 继续 输入 其 它 汉字 ， 也 可 以 再 按 一 次 “F1” 键 退出 区 位 状态 。 


区 位 5203 


区 位 输入 法 示意 


您 现在 可 以 用 区 位 输入 法 输入 您 的 名 字 看 看 〈《 区 位 表 》 在 《操作 手册 》 的 附录 中 有 ,， 也 可 
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以 在 书店 买 到 ) 。 

按 一 下 “F1” 键 ,屏幕 左下 角 会 立刻 显示 出 “区 位 ”字样 , 这 时 候 就 可 以 用 区 位 输入 法 输入 汉 
字 了 。 

使 用 区 位 输入 法 ， 需 要 知道 汉字 的 区 位 码 ， 如 果 每 输入 一 个 汉字 都 要 查 《区 位 表 》， 那 输入 一 
篇 文章 所 耗费 的 时 间 简 直 就 天 文 数 字 了 ! 把 几 千 个 汉字 的 区 位 码 都 背 下 来 , 那 是 不 现实 的 。 因 此 ， 
区 位 输入 法 并 不 常用 。 要 想 更 快 更 有 效 地 输入 汉字 ， 就 需要 掌握 更 实用 的 汉字 输入 方法 。 

只 要 您 认识 汉语 拼音 ， 就 能 使 用 “拼音 ”输入 法 输入 汉字 。 拼 音 输入 法 常见 的 有 两 种 : “全 
拼 ” 和 “ 双 拼 >。 我 们 先 看 看 最 简单 易学 的 “全 拼 ” 输 入 法 : 

@@ 我 们 举例 说 明 全 拼 输 入 方法 ， 

以 输入 汉字 “但 ”为 例 。 

人 电 按 一 下 “F2” 键 ， 屏 幕 左 下 角 显 示 “ 全 拼 >”， 表 示 已 经 进入 了 全 拼 状 态 〈 还 有 一 些 汉 字 也 显 
示 出 来 ， 它 们 一 般 没 有 用 ); 

@@ 我 们 知道 ,“ 但 ” 字 的 拼音 是 “dan”， 所 以 我 们 现在 融入 拼音 字母 “DAN”， 殴 完 后 ， 屏 幕 
最 后 一 行 显示 : 

全 拼 DAN 国 1 耽 2 担 3 丹 4 单 5 郸 

人 五 个 与 “但 ”同音 的 汉字 都 显示 出 来 了 , 但 其 中 没有 我 们 要 输入 的 “但 ” 字 ， 怎 么 办 呢 ? 我 
们 只 要 按 一 下 “> 之 ” 键 ， 屏 幕 上 立刻 会 继续 显示 后 面 五 个 同音 字 ， 

全 拼 DAN 国 1 撞 2 胆 3 有 旦 4 氮 5 但 

曲 其 中 第 五 个 字 是 我 们 要 输入 的 ， 此 时 按 一 下 “5” 键 ,“ 但 ” 字 就 输入 完了 ， 它 立刻 出 现在 
光标 处 。 

现在 可 以 按 上 面 步 又， 继续 输入 其 它 汉 字 ， 也 可 以 按 “F2” 键 ， 退 出 全 拼 状 态 。 

注 : 由 于 汉字 中 同音 字 较 多 ， 每 输入 一 个 拼音 ， 屏 幕 上 每 次 只 显示 出 五 个 拼音 相同 的 字 ， 若 
按 “ 之 ” 键 可 以 继续 下 一 组 拼音 相同 的 字 ， 按 “<” 键 则 可 以 往 回 找 。 


全 拼 DAN 国 1 拌 2 胆 3 旦 4 氮 5 但 


全 拼 输入 法 示意 

侠 双 拼 输入 法 一 一 全 拼 输 入 法 简单 易学 , 但 输入 速度 却 太 慢 , 有 一 种 与 全 拼 类 似 的 输入 法 , 叫 
双 拼 输入 法 ， 同 样 简单 易学 ， 但 速度 较 全 拼 有 所 提高 。 

双 拼 输入 法 和 全 拼 一 样 ， 也 是 输入 拼音 ， 得 到 汉字 。 但 双 拼 有 一 个 特点 : 不 论 拼音 多 长 ， 一 
律 只 殴 两 个 键 ， 其 中 第 一 个 键 是 声母 ， 第 二 个 键 为 韵母 。 如 “F” 键 ,在 双 拼 中 ， 它 既 可 以 表示 声 
母 “f”， 又 可 以 表示 韵母 “an”。 下 面 仍 以 “但 ” 字 为 例 ， 说 明 双 拼 输 入 法 : 

@ 申 按 一 下 “F3” 键 ， 屏 幕 左下 角 显 示 “ 双 拼 >， 表 示 已 经 进入 了 双 拼 状态 〈 还 有 一 些 汉字 也 显 
示 出 来 ， 它 们 一 般 没 有 用 )， 
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包 我 们 知道 , “但 ” 字 的 拼音 是 “dan”， 所 以 我 们 现在 融入 字母 “DF” (“F” 可 表示 韵母 
“an”) ， 涡 完 后 ， 屏 幕 最 后 一 行 显示 : 

双 拼 DAN 国 1 耽 2 担 3 丹 4 单 5 郸 

@@ 五 个 与 “但 ” 同音 的 汉字 都 显示 出 来 了 , 其 中 没有 我 们 要 输入 的 “但 ” 字 , 按 一 下 “> 之” 键 ， 
继续 查找 后 面 的 同音 字 ， 

双 拼 DAN 国 1 撞 2 胆 3 有 旦 4 氮 5 但 

外 其 中 第 五 个 字 是 我 们 要 输入 的 ， 此 时 按 一 下 “5” 键 ,“ 但 ” 字 就 输入 完了 ， 它 立刻 出 现在 
光标 处 。 

现在 可 以 按 上 面 步 又， 继续 输入 其 它 汉 字 ， 也 可 以 按 “F3” 键 ， 退 出 双 拼 状态 。 

注 , 由 于 汉字 中 同音 字 较 多 ， 每 输入 一 个 拼音 ， 屏 幕 上 每 次 只 显示 出 五 个 同音 字 ， 如 果 没 有 
要 输入 的 ， 可 以 按 “ 之 ”继续 显示 其 它 同音 字 ， 按 “<” 可 以 则 可 以 往 回 找 。 


双 拼 DAN 国 1 撞 2 胆 3 旦 4 氮 5 但 


双 拼 输入 法 示意 
我 们 已 经 知道 字母 “F” 可 以 表示 声母 “f” 和 前 母 “an”， 还 有 许多 类 似 的 键 ， 归 纳 如 下 ， 以 
便 记 忆 : 


图 十 三 双 拼 键盘 排列 示意 图 
您 能 用 上 面 介绍 的 输入 法 输入 您 的 名 字 了 吗 ? 看 看 哪 种 输入 法 速度 最 快 。 
@@ 其 它 汉 字 输 入 方法 : 
裕 兴 超级 学 习 卡 还 为 你 提供 了 如 今 社会 上 很 热门 的 五 笔 字 型 汉字 输入 法 。 五 笔 字 型 汉字 输入 
的 详细 资料 请 看 《五 笔 字 型 练习 册 》。 


五 党 字 
型 
练习 骨 


目 


十 洁 二 中 让 出 四 IN II 


练习 题 
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随 着 电脑 在 我 国 的 普及 ,为 适应 中 国人 使 用 电脑 ， 涌 现 出 很 多 汉字 输入 法 ， 其 中 五 笔 字 型 输 
入 法 以 重 码 率 低 ， 输 入 速度 快 等 优点 得 以 逐渐 被 广泛 采用 。( 据 统计 ， 经 一 定 的 指法 训练 ,五 笔 字 
型 法 输入 可 达 每 分 钟 120 一 160 字 。) 裕 兴 为 满足 您 的 要 求 ， 提 供 了 五 笔 字 型 输入 法 ， 配 有 五 笔 字 
型 键 帽 标签 ， 并 以 此 练习 册 帮 您 尽快 掌握 这 种 汉字 输入 法 。 学 习 五 笔 字 型 既 可 掌握 一 种 向 电脑 输 
入 汉字 的 方法 又 可 以 为 将 来 参加 社会 工作 打下 基础 ， 还 可 以 学 习 一 些 汉 字 结 构 方 面 的 知识 。 您 看 ， 
何 乐 而 不 为 呢 ?! 


一 基本 字 人 根 


人 们 把 汉字 中 由 笔划 交叉 连接 而 成 的 相对 不 变 的 结构 称 为 偏 劳 、 部 首 ， 而 在 五 笔 字 型 输入 法 
_ 中 , 把 由 基本 笔划 组 成 的 在 汉字 中 结构 相对 不 变 的 部 分 称 为 字 根 , 偏旁 、 部 首 并 不 等 价 于 字 根 。 比 
如 平时 常 说 的 木子 李 ， 是 说 李 字 由 “ 木 ” 和 “ 子 ” 组 成 ， 森 和子 都 是 五 笔 的 基本 字 根 ， 所 以 五 笔 
中 称 李 字 由 字 根 “ 木 ”和 “ 子 ” 组 成 。 可 是 平时 说 的 弓 长 张 ， 虽 说 是 由 “ 己 ”、“ 长 ”组 成 ， 但 其 
中 只 “ 妃 ” 是 五 笔 的 基本 字 根 ， 而 “长 ”不 是 基本 字 根 ， 还 需要 继续 分 解 。 

五 笔 字 型 字 根 优选 的 原则 是 ， 字 根 组 字 的 能 力 强 ， 而 且 在 日 常 汉 语文 字 中 出 现 次 数 多 〈 实 用 
频率 高 )。 这 些 字 根 可 以 按 较 为 统一 一 的 规则 拼 形 到 成 汉学 > 委 说 汉学 可 以 按 较为 统一 一 的 规则 拆 分 
为 基本 字 根 的 确定 组 合 ， 避 兔 产 生 多 种 拆 分 可 能 ， 造 成 一 种 字 根 组 合 可 能 出 现 多 个 字 的 局 面 。 

名 过 大 量 统计 和 反复 试用 ， 五 笔 字 型 法 选用 了 130 个 基本 字 根 ， 请 看 五 笔 字 理 法 基本 字 根 总 
表 。 由 总 表 可 看 出 , 130 个 基本 字 根 按 起 笔 的 笔划 分 为 五 大 区 , 每 区 内 又 分 五 个 位 , 由 两 位 数 的 区 
位 码 来 标记 ， 其 中 十 位 数 为 区 号 ， 个 数位 是 位 号 ， 以 11 一 55 共计 25 个 代码 表示 。 今 后 凡是 提 到 
字 根 ， 一 律 指 这 130 个 基本 字 根 ， 也 就 是 说 ， 只 有 这 130 个 基本 字 根 才 有 资格 参加 组 字 编 码 ， 其 
它 任何 形态 的 笔划 结构 ， 都 要 理解 为 是 由 这 130 个 基本 字 根 组 成 的 。 因 此 ， 这 130 个 基本 字 根 既 
是 组 字 的 依据 ， 又 是 拆字 的 依据 ， 是 对 任何 汉字 及 词汇 编码 的 “基本 构件 "。 这 130 个 基本 字 根 中 
又 可 分 为 键 名 字 、 笔 形 和 基本 字 根 三 种 ， 它 们 都 统称 为 基本 字 根 ， 后 面 会 一 一 提 到 。 


二 ， 字 根 与 字 根 的 结构 关系 


基本 字 根 可 以 拼合 组 成 所 有 汉字 。 在 组 成 汉字 时 ， 字 根 间 的 位 置 关 系 可 以 分 为 四 种 类 型 一 一 
单 、 散 、 连 、 交 。 

(1) 单 ， 本 身 就 单独 成 为 汉字 的 字 根 , 这 在 130 个 基本 字 根 中 占 很 大 比重 , 有 八 九 十 个 , 如 
王 、 木 、 禾 、 言 等 。 

(2) 散 构成 汉字 的 不 止 - 个 字 根 ， 而 且 字 根 之 间 保 持 -- 定 距 离 , 不 相连 也 不 相交 。 如 : 汉 、 
字 、 笔 、 型 、 培 、 训 等 。 

(3) 连 五 笔 字 型 中 字 根 间 的 相连 关系 并 非 通俗 的 望 文生 意 的 相互 连接 之 意 ， 五 笔 字 型 中 
并 不 认为 以 下 字 是 由 字 根 相连 得 到 的 ， 如 : 足 、 充 、 首 、 左 、 页 、 美 、 易 、 麦 等 ， 而 是 特 指 以 下 
两 种 情况 : 

人 b 单 笔划 与 某 基 本 字 根 相连 。 如 


五 笔 字 型 基本 字 根 总 表 


1| 1 | G |1 王 一 五 戈 王 旁 青 头 戈 五 一 
机 252 F | 土 士 二 十 “ 寸 雨 土 士 二 千 十 寸 雨 
起 3 | 13 了 | 天 大 三 :， 洁 丰 三 大 犬 三 ( 羊 ) 古 石 厂 
类 4 | 14 S | 木 丁 西 木 丁 西 
5 | 315 A | 工 瑟 七 长 戈 井 廿 十 工 成 草 头 右 杠 七 
1 | 21 H | 目 卜 上 止 目 具 上 止 仆 虎 皮 
友 2 | 22 本 | 日 昌 1】 早 虫 日 早 两 坚 与 虫 依 
国 3 | 23 K | 口 咱 口 与 川 , 字 根 稀 
4 | 24 L | 田 甲 口 车 亚 车 力 口 田 甲 方 框 四 车 力 
关 |5| 站 | M | 而 由 口中 用 山上 贝 ,下 框 几 
禾 禾 竹 久久 | 禾 竹 一 撤 双 人 立 
反 文 条 头 共 三 一 
白手 斤 斤 白手 看 头 三 二 斤 
月 乡 乃 用 秋 “| 月 乡 乃 用 家 衣 底 
人 《上 八 人 和 人 和 八 , 三 四 里 
金 八 分 儿 夕 金 勺 缺点 夕 , 氏 无 七 
言 盖 、 广 文 方 圭 言 文 方 广 在 四 一 
高 头 一 撩 谁 人 去 
立 y 六 辛 六 门 立 辛 两 点 六 门 闻 
水 ? 小 水 旁 兴 头 小 倒立 
火 心 米 业 火 业 头 , 四 点 米 
之 j 支 盖 订 之 宝 盖 , 摘 #( 示 ) 让 ( 衣 ) 
已 已 已 乙己 心 十 羽 已 半 已 满 不 出 已 
左 框 折 尸 心 和 羽 子 
子 子 也 口 了 耳 DR 耳 了 也 框 向 上 
女 刀 九 刁 白 女 刀 媲 白山 朝 西 
又 人 巴 马 又 巴 马 , 委 和 撩 侨 


纪 么 弓 蕊 慈母 无 心 弓 和 蕊 , 幼 无 力 


站 本 了 癌 丁 33 品 本 功 


单 笔划 与 基本 字 根 间 有 明显 间距 者 不 能 称 为 相连 关系 ， 如 : 个 少 么 旦 幻 旧 孔 乞 鱼 。 

@ 带 点 结构 ， 认 为 是 相连 的 。 这 类 字 如 : 

勺 术 太 主义 斗 头 

这 些 字 中 的 点 与 另外 的 基本 字 根 并 不 一 定 相连 ， 其 间 可 连 可 不 连 ， 可 稍 远 可 稍 近 。 在 五 笔 字 
型 中 把 上 述 两 种 情况 一 律 视 为 相连 。 即 不 承认 它们 之 间 是 上 下 结合 或 左右 结合 。 这 种 规定 有 利于 
简化 、 明 确 地 判定 汉字 的 结构 。 

(4) 交 指 两 个 或 多 个 字 根 交叉 套 远 构成 的 汉字 。 如 : 


三 ”汉字 分 解 为 字 根 的 拆 分 原则 


上 面 所 说 的 单 ， 即 汉字 本 身 就 是 一 个 基本 字 根 ， 不 需要 再 拆 分 ， 这 类 字 的 编码 有 单独 规定 。 

上 面 所 说 的 散 , 由 于 字 根 之 间 下 离 分 立 , 很 容易 拆 分, 您 可 以 自己 试 着 拆 一 些 字 。 拆 分 问题 集 
中 于 要 解决 连 、 交 及 混合 型 的 情况 。 具 体 拆 分 中 要 注意 掌握 下 面 口 诀 给 出 的 四 个 要 点 。 

取 大 优先 ， 兼 顾 直观 ， 能 连 不 交 ， 能 散 不 连 。 


以 下 为 拆 分 实例 : 
吏 : 大 非 : 二 站 三 
无 福 泡 重 ; 了 一 月 十 
自 : / 目 生 : / 主 
天 ji 二 大 囊 和 和 
丑 : 乙 土 


取 大 优先 也 叫 能 大 不 小 。 在 可 能 的 拆 分 中 以 拆 分 出 的 字 根 数量 最 少 的 那 种 拆 法 为 优先 。 要 字 
根 数 少 且 字 根 尽 可 能 大 来 实现 拆 分 。 尽 可 能 大 ， 指 某 一 拆 分 出 的 字 根 再 加 一 笔 便 不 能 构成 已 知 字 
根 为 准 。 请 看 以 下 实例 ， 2 

正确 错误 
果 日 本 是 小 (因为 且 不 是 基本 字 根 ) 

相连 关系 ， 按 上 面 的 规定 ， 只 是 单 笔划 与 基本 字 根 之 间 的 关系 才 视 为 连 。 这 类 字 也 就 直接 拆 

分 为 单 笔 和 基本 字 根 两 者 的 组 合 。 这 类 字 如 : 


拆 分 中 还 应 注意 ， 一 个 笔划 不 能 割断 用 在 两 个 字 根 中 。 如 
正确 错误 
果 日 木 田 木 (因为 写 “ 果 ” 字 时 中 间 那 竖 是 一 贯 而 下 的 ) 
因此 刚才 那个 口诀 不 妨 加 上 四 句 ， 补 为 下 面 这 样 : 
单 勿 需 拆散 拆 简单 ” 难 在 交 连 笔划 勿 断 
能 散 不 连 ”兼顾 直观 ”能 连 不 交 取 大 优先 


成 干 上 万 的 方块 汉字 大 体 可 分 为 三 种 结构 类 型 : 左右 型 、 上 下 型 、 杂 合 型 。 这 三 种 字 型 的 划 
分 是 基于 对 汉字 整体 轮廓 的 认识 ， 指 的 是 整个 汉字 中 字 根 之 间 的 相互 位 置 关 系 ， 搞 清 这 一 点 对 于 
确定 多 字 根 的 汉字 的 类 型 是 十 分 重要 的 。 

1， 左 右 型 汉字 

在 左右 型 汉字 中 ,包括 两 种 情况 : 

4) 在 双 合 字 中 ， 两 个 部 分 分 列 左右 ， 整 个 汉字 中 有 着 明显 的 界线 ， 如 : 肚 、 胡 、 理 、 胆 、 
咽 、 拥 等 。 

咽 右边 的 因由 两 个 字 根 构成 ， 虽 然 这 两 个 字 根 之 间 是 一 外 一 内 的 关系 ， 但 整个 汉字 却 属于 左 
右 型 。 


《2) ”三 合 字 中 ， 整 个 汉字 的 三 个 部 分 从 左 到 右 并 列 ， 或 者 单独 占据 一 边 的 一 部 分 与 另外 两 
个 部 分 呈 左 右 排 列 ， 如 : 侧 、 别 、 谈 等 ， 都 应 属于 左右 型 。 

2， 上 下 型 汉字 

上 下 型 汉字 也 包括 两 种 情况 : 

(1) 在 双 合 字 中 ， 两 个 部 分 分 列 上 下 ， 其 间 有 一 定 距离 ， 如 : 字 、 节 、 看 等 。 

《2) 三 合 字 中 , 三 个 部 分 目下 排列 ,或 者 单 占 一 层 的 部 分 与 另外 两 部 分 作 上 下 排列 , 如 : 意 、 
想 、 花 等 。 

3， 杂 合 型 一 一 外 内 型 和 单 体 型 汉字 

杂 合 型 指 组 成 整 字 的 各 部 分 之 间 没 有 简单 明了 的 左右 上 下 型 关系 。 如 : 团 、 同 、 这 、 斗 、 头 、 


飞 、 本 、 天 、 册 、 成 等 。 
所 是 避让 


汉字 的 图 形 特 征 ， 是 每 一 个 有 文化 的 中 国人 从 上 小 学 起 就 熟知 的 。 这 里 ， 可 以 用 来 作为 识别 
汉字 的 一 个 重要 依据 。 如 :“ 口 ”“ 八 ”上 下 排列 为 “只 ”， 而 左右 排列 为 “ 叭 ”等 。 因 此 ， 还 可 
以 把 三 种 字 型 叫做 字 根 的 三 种 排列 方式 。 在 向 计算 机 输入 汉字 时 , 除了 键入 组 成 汉字 的 字 根 外 , 有 
时 还 有 必要 告诉 机 器 那些 键入 的 字 根 是 以 什么 方式 排列 的 ， 即 补充 键入 一 个 字 型 信息 ， 后 面 会 提 
到 。 

各 型 的 划分 中 ， 还 有 以 下 约定 

凡 属 字 根 相连 〈 指 单 笔 与 字 根 相连 或 带 点 结构 ) 一 律 视 为 杂 合 型 。 

几 键 面 字 〈 本 身 就 是 单个 字 根 )， 有 单独 编码 方法 ， 不 必 利 用 字 型 信息 。 

主要 对 属于 散 、 交 两 类 字 根 结合 关系 ， 要 区 分 字 型 。 


五 “五 笔 字 型 键盘 分 布 及 使 用 


1 五 笔 字 型 字 根 的 键盘 分 布 

五 笔 字 型 法 的 130 个 字 根 ， 按 起 笔 笔 划分 五 大 区 ， 每 一 区 占 键 盘 上 相连 的 一 片 每 一 片 共 有 五 
个 键 位 ， 键 位 上 的 编号 称 为 位 号 。 这 些 位 号 与 字 根 的 关系 都 反映 在 字 根 总 表 上 。 按 这 个 表 得 到 的 
键盘 分 布 如 下 图 : 如 果 您 的 键盘 上 没有 印 下 图 ， 可 以 购买 裕 兴 为 您 提供 的 五 笔 字 型 键 帽 标签 贴 在 
键 上 ， 等 您 练 到 熟练 的 程度 就 可 以 揭 下 键 帽 盲 打 了 。 


五 笔 字 型 键盘 字 根 总 图 . 


| [全 56 克 大 站 [布衣 (而 下 ( 采 于 人 竹 ] (高 文 方 | f 立 六 * 痒 xx f 火 沁 水 ] ( 信 开 天 
当 芭 从 2 这 六 yw 之 5 
夕 和 乡 乒 八 八代 孜 东 和 4 人 女 久 千 上 主 | | 门 小 yy 之 2 
.35Q._ 347 ) .335E ) .32 有 . 3 Lanu | 0 440 5P 


工 P( 末 了 人 伏 呵 石 | 仁 土 于 ] 正二 | 但 贡 fenoel fa 田 wf 

民 油 - 汉 汪 许 Pi| | 二 天 十 2 人 和 上 站 所 川 隐士 霹 二 

苹 龙 | | 西 三 二 产 庆 | | 十 “和 填 | 亚 。 赤 目 王 焉 二 7 ”中 车 加 力 了 
1 站 本 下 


人 (到 了 了 ] 已 ee 二 ] f 下 出 只 区 Ye 
中 己 已 全 《 宽 下 区 天 
2 什 必 2 书 马 | | 习 自 | | 牙 gpe LI 心 f4 吸 门 a 几 
UL 2 几 sx 由 ae sav 人 


1 1 工 沁 册 类 作 (总 ) 四 -1 村 只 上 止 卜 虎 上 区 ， 3 1 系 竹 -- 招 公信 立 ， 4 1 痛 文 方 广 丰 由 一， 5 1 已 站 已 讽 不 出 忆 ， 
| 1 二 人才 二。 ZL 2 日 蛙 册 怪 与 生 依 。 及 义 条 块 其 三 高 全 入 诊 人 去 。 页 但 殷 请 -和 别 - 
| 1 人 大 二 二 (七 ) 而 有 上 2 3 05 川 ， 闻 根 策 ， 人 4 2 立 宣 摧 总 六 人 大 ， 5 了 是 了 也 朴 癌 上。 
1 4 中 工 出 ， 2 4 田 遇 方 械 四 车 力 -。 3 3 月 条 (六 ) 力 放 次 丰 诺 . 4 3 水 窃 兴 头 小 例 立 - 5 4 女 朋 用 让 由 和 本 。 
| 15 上 电 草 头 丰 要 革 。 ZL5 Ubb 愉 ， 上 要 几 。 3 4 人 相 八 ， 三 四 由 4 4 火 业 头 ， 中 怠 音 ， 和 思 且 于 人 旭 ， 
上 本 人 和 二 让 和 区 二 后 Le 3 5 人 金 久 映 点 无 尾 鱼 ， 45 之 宁 衬 监 道 娃 底 5 0 起 出 无心 号 和 蕊 ， 
| 本 和 尝 蜡 学 提 昌 记 间 类 筋 名 多 儿 -总 2 CEL (人 的 二 (天 ) (Cg) - 荔 克 有 
nc 一 一 一 一 wavveeeioirapraaas nanasaisinevemesisnor seinreiieiipiissimegsisseeas 6 2 一 ae 思 通 


每 个 键 上 取 一 个 字 根 做 键 名 ， 名 谱 如 下 : 
一 区 : 横 起 笔 ， 王 土 大 木工 二 区 坚 起 笔 ， 目 日 口 田 山 
三 区 ， 搬 起 笔 ， 禾 白 月 人 金 四 区 : 护 起 笔 ， 言 立 水 火 之 
五 区 : 折 起 笔 ， 已 子女 又 


2 “ 键 位 安排 中 一 些 辅助 记忆 的 特点 

键 位 安排 上 力求 有 规律 、 不 杂乱 ， 尽 量 使 同一 键 上 的 字 根 在 形 、 音 、 义 方面 能 产生 所 需 的 联 
想 ， 这 有 助 于 记忆 ， 便 于 迅速 熟练 掌握 。 可 以 列 出 以 下 的 规律 性 ; 

(1) 字 根 首 笔 笔 划 代 号 和 所 在 区 号 一 致 。 

(2) “相当 一 部 分 字 根 其 第 二 笔 笔 划 号 与 位 号 一 致 ， 如 : 王 、、、 戈 、 文 、 方 、 广 。 

(3) ”部 分 字 根 的 笔划 数 与 位 号 一 致 ， 如 : 、、 7 、? 、 心 分别 在 1、2、3、4 位 ， 字 根 

= 分别 在 15722 志 二 位 5 

(4) ”部 分 字 根 与 键 名 字 根 形态 相近 ， 例 如 

键 名 形似 字 根 


反 


汪 十 


、 四 


四 人 闪 洁 阔 王 田 汗 片 出 
中信 盖 泗 洲 卫 理 阔 上线 岂 


(5) ”位 号 从 中 间 向 两 侧 由 小 到 大 规则 变化 。 在 五 笔 字 型 键盘 字 根 总 图 上 逐个 键 位 给 出 了 助 
记 解 说 ， 利 用 这 些 助 记 特性 和 口诀 ， 不 难 记 忆 各 字 根 的 键 位 。 和 您 不 妨 仔细 观察 分 析 一 下 字 根 总 表 
和 键盘 图 ， 寻 找 、 记 住 可 助 记 的 各 类 特征 。 


六 ”五笔 字 型 单字 输入 编码 规则 


1 编码 歌诀 
单字 的 五 笔 字 型 输入 编码 有 歌 雇 如 下 : 


五 笔 字 型 均 直观 ， 依 照 笔顺 把 码 编 ; 
键 名 汉字 打 四 下 ， 基 本 字 根 请 照搬 ; 
一 二 三 末 取 四 码 ， 顺 序 拆 分 大 优先 ; 
不 足 四 码 要 注意 ， 交 叉 识别 补 后 边 。 
歌 雇 中 包括 了 以 下 原则 ; 
(1) 。 取 码 顺序 ,依照 从 左 到 右 ， 从 上 到 下 ,从 外 到 内 的 书写 顺序 〈 见 “依照 笔顺 把 码 编 ” 那 
一 句 ) 
(2) ” 键 名 汉字 〈 见 “ 键 名 汉字 打 四 下 ” 那 一 句 ) 
〈3) ， 字 根 数 为 四 或 大 于 四 时 ， 按 一 、 二 、 三 、 来 字 根 顺序 取 四 码 〈 见 “一 二 三 未 取 四 码 ” 那 
一 句 ) 
(4) 不足 四 个 字 根 时 打 完 字 根 识别 码 后 ， 补 交叉 识别 码 于 尾部 。 此 种 情况 下 ， 码 长 为 3 或 
4 〈 见 最 后 一 句 ) 
歌 雇 中 “基本 字 根 请 照搬 ” 句 和 “顺序 拆 分 大 优先 ”是 拆 分 原则 。 就 是 说 在 拆 分 中 以 基本 字 
根 为 单位 ， 并 且 在 拆 分 时 “ 取 大 优先 ”， 尽 可 能 先 拆 出 笔划 最 多 的 字 根 。 或 者 说 拆 分 出 的 字 根 数 要 


尽量 少 。 
五 笔 字 型 编码 流程 图 如 下 ， 五 笔 字 型 编码 流程 网 


键 名 : 把 所 在 键 连 打 四 下 
例 ， 言 ， 言 言 言 言 ， 又 :又 又 又 又 ; 山 : 山 山 山 山 
键 面 有 |~ YYYY GCC MMMM 
成 字 根 ， 报 户口 加 打 第 一 、 二 、 来 单 笔画 〈 不 足 四 码 ， 补 空格 键 ) 
例 , 西 ; 西 一 | 一; 方 : 方 ， 一 忆 ; 厂 ， 厂 一 上 〈 空 格 ) 
SGHG YYGN DGT 
书写 顺序 ， ~ 超过 四 码 ， 取 1、2、3、 来 字 根 编码 
汉字 | 一 例 ， 例 ， 葛 ， 立 早 父 贝 ! 攀 : 木 X X 手 
新 : 立木 斤 〈 正 ) 刚好 四 码 ， 依 次 键入 即 可 
立 斤 木 〈 误 ) 例 ， 照 :日 刀口 必 ; 到 : 一 A 土 由 
取 大 优先 不 足 四 码 ， 字 根 键入 完 后 ， 补 打 “ 来 笔 字 型 识别 码 ” 
例 ， 〈 仍 不 足 四 码 ， 补 空格 键 ) 
平一 兰 | 下) 一 世人 钙 未 笔 字 型 识别 码 码 表 
键 面 无 |-~| 依 照 ]- 一 v 十 〈 误 ) 汉 ，43 54 41 
兼顾 直观 人 
. 例 ， TE 学 
自 ; 上 目 ( 正 ) 会 ， 34 12 54 43| 11( 一 ) 3 
了 了 三 《〈 误 ) 人 二 和 人 2101) | 22C) | 23GI) 
人 必 ，51 全 31() ) | 32( 必 ) | 33( 乡 ) 
RssvOE5 心 二 乡 |41(\) 42(、) 43(? ) 
二 人 《 误 ) NTE 51( 乙 ) | 52((() | 53(() 


七 “ 键 名 汉字 的 编码 


我 们 现在 说 说 键 名 字 ， 键 盘 上 共有 25 个 键 名 汉字 ， 


四 水 亚 HH 出 
8 

涉 亲 互 沐 装 

六 > 一头 站 

心 耻 三 HH 于 


这 25 个 字 各 占 一 键 ,它们 的 编码 是 把 所 在 键 的 字母 连 写 四 次 ,输入 它们 时 需 连 击 所 在 键 四 次 ， 
即 ， 
“ 王 ” 字 编码 为 ，GGGG ， 输 入 时 需 连 击 G 四 下 。 
“ 目 ” 字 编 码 为 ， HHHH， 输 入 时 需 连 击 G 四 下 ， 等 等 。 
所 以 这 样 规 定 ， 是 由 于 已 把 这 些 单 键 分 给 25 个 高 频 字 ， 对 25 个 高 频 字 击 一 下 便 可 输入 一 个 
汉字 ， 而 键 名 只 好 委屈 些 和 其 它 字 统一 使 用 四 码 ，25 个 高 频 字 的 输入 见 一 级 简 码 。 
在 130 个 基本 字 根 中 ， 除 25 个 键 名 字 根 外 ， 还 有 几 十 个 本 身 也 是 汉字 ， 称 它们 为 “成 字 字 
根 ”。 键 名 和 成 字 字 根 合 称 为 键 面 字 。 成 字 字 根 的 编码 公式 为 ; 
键 名 码 十 首 笔 码 十 次 笔 码 十 末 笔 码 
当成 字 字 根 仅 为 两 笔 时 ， 只 有 三 码 ， 公 式 为 : 
键 名 码 十 首 笔 码 十 末 笔 码 
键 名 码 即 所 在 键 字母 ， 击 此 键 又 称 报 户口 。 
首 单 笔 码 、 次 单 笔 码 和 未 单 笔 码 , 不 是 按 字 根 取 码 ， 而 是 按 单 笔划 取 码 ， 横 、 坚 、 撤 、 氛 、 折 
这 五 种 单 笔 的 单 笔划 取 码 就 是 各 区 的 第 一 个 字母 ， 对 应 关系 如 下 ， 
笔 划 横 竖 撤 护 折 
单 笔划 码 G H T YN 


G H G 
G H Y 

G HY 

G G 

G 

和 汉字 数码 “一 ”以 及 汉字 “ 乙 ”( 单 笔划 折 的 代表 ) 都 是 只 有 一 笔 的 成 字 字 根 。 用 
概括 ， 而 单 笔划 有 时 也 需要 单独 使 用 ， 特 别 规定 了 五 个 笔划 的 编码 如 下 : 
Gz= 开 下 

L 天 
E 

.二 

; 二 

码 的 前 两 位 可 视 为 和 前 述 公 式 有 统一 性 ， 第 一 位 是 键 名 码 ， 第 二 位 是 首 笔划 码 ， 因 为 没有 
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面 给 出 几 个 成 字 字 根 的 编码 
二 


是 


弟 申 
习 
辟 融 


二 


其 它 笔划 而 补 打 两 次 工 键 。 
八 _ 键 外 字 的 编码 


上 述 二 、 三 中 的 键 面 字 总 共有 一 百 多 个 。 键 面 字 以 外 的 汉字 都 是 键 外 字 ， 而 且 数量 很 大 。 汉 
字 输 入 编码 主要 是 键 外 字 的 编码 ， 含 四 个 或 四 个 以 上 字 根 的 汉字 ， 用 四 个 字 根 码 组 成 编码 ， 不 足 
四 个 字 根 的 键 外 字 要 补 打 一 个 字 型 识别 码 。 

1， 字 根 码 四 

每 个 字 根 都 分 派 在 一 个 字母 键 上 ， 其 所 在 键 上 的 英文 字母 就 是 该 字 根 的 “ 字 根 码 ”。 

凡 含 四 个 或 四 个 以 上 字 根 的 汉字 , 取 其 第 一 二、 三、 未 四 个 字 根 码 组 成 键 外 字 的 输入 码 。 这 
里 一 、 二 、 三 、 未 四 个 字 根 应 按 正常 书写 顺序 ， 先 左 后 右 ， 先 上 后 下 ， 先 外 后 内 。 下 面 给 出 一 些 
例 字 ; 


字 根 分 解 编 码 
续 二 十 乙 大 XFND 
紧 站 又 红 小 JE 交工 
容 八 人 口 PWWK 
磨 ” 广 木 木石 YSSD 
酸 西 一 A 久 SGCT 


2.， 来 笔划 字 型 交叉 识别 码 

当 一 个 键 外 字 的 字 根 不 足 四 个 时 ， 依 次 键入 字 根 码 后 ， 最 后 补 一 个 识别 码 ， 识 别 码 用 末 笔 划 
的 类 型 编号 和 字 型 编号 组 成 。 具 体 地 说 ， 识 别 码 后 为 两 位 数字 ， 第 一 位 是 末 笔 划 类 型 编号 〈 横 1、 
竖 2、 撒 3、 捧 4、 折 5)， 第 二 位 是 字 型 代码 〈 左 右 型 1、 上 下 型 2、 杂 合 型 3) 。 把 识别 码 看 作 一 
个 键 的 区 位 码 ， 就 会 得 到 交叉 识别 码 〈 字 母 码 )， 其 码 表 如 下 : 


末 笔 划 、 字 型 交叉 识别 码 表 


请 看 下 面 的 实例 ; 


字 根 码 | 末 笔 代号 识别 码 


43I 


13D 


所 


编码 中 加 了 识别 码 后 仍 不 足 四 码 时 , 击 空格 键 补 足 。 单 笔 与 字 根 相 连 的 字 型 为 杂 合 型 。 加 识别 
码 的 作用 是 减少 重 码 ， 加 快 选 字 。 在 不 用 识别 码 时 ， 各 、 晃 、 旭 这 三 个 汉字 的 编码 是 相同 的 ， 也 
就 是 重 码 ， 加 了 识别 码 后 就 可 以 分 开 它 们 了 。 

关于 末 笔 划 有 以 下 的 规定 ， 可 以 使 取 码 简单 、 明 确 。 

(1) 末 字 根 为 “ 力 、 刀 、 九 、 七 ”等 时 ， 一 律 认为 末 笔 划 为 折 。 

(2) 象 进 、 退 、 远 等 字 ， 不 以 “ 走 之 ”的 末 笔 为 末 笔 〈 书 写 时 确实 是 末 笔 ， 但 是 这 样 的 话 
末 笔 都 一 样 ， 减 少 了 识别 信息 量 )， 约 定 以 去 除 掉 “ 走 之 ”的 末 笔 为 整个 字 的 末 笔 来 构成 识别 码 。 
进 、 偿 、 远 的 识别 码 分 别 为 : 23; K、13; K、53，V。 当 以 “ 走 之 ”的 来 笔 为 末 笔 时 ， 它 们 的 识 
别 码 都 是 43，I， 以 至 无 法 识别 。 

(3) 我、 成 等 字 的 末 笔 为 “) ”。 

关于 字 型 有 如 下 约定 : 

(1) 凡 单 笔划 与 字 根 相连 或 带 点 结构 都 视 为 杂 合 

(2) ” 字 型 区 分 时 ， 也 用 “能 散 不 连 ” 的 原则 。 

(3) ”内 外 型 字 属 杂 合 型 ， 如 困 、 同 、 臣 。 但 “ 见 ” 为 上 下 型 。 

(4) 含 两 个 字 根 且 它 们 相交 者 属 杂 合 型 。 

(5) “下 含 “ 走 之 ”的 字 属 杂 合 型 ， 如 : 东 、 串 、 电 、 本 、 无 、 农 、 里 。 

(6) 以 下 各 字 为 杂 合 型 : 司 、 厅 、 龙 、 尼 、 式 、 后 、 反 、 处 、 办 、 皮 、 习 、 死 、 疗 、 压 ， 但 
和 它们 相似 的 右 、 左 、 有 、 看 、 者 、 布 、 包 、 友 、 冬 、 灰 却 视 为 上 下 型 。 

3， 字 根 区 位 码 输 入 

每 个 字 根 都 有 所 在 的 区 位 码 ， 在 字 根 总 表 中 已 经 标明 了 。 例 如 : 王 的 区 位 码 为 11， 白 的 区 位 
码 为 32。 一 个 汉字 可 用 上 述 的 方法 按照 编码 击 英文 字母 键 输入 汉字 ,也 可 以 把 每 个 字母 换 成 两 位 
的 区 位 码 ， 击 右 部 数字 专用 键盘 的 数字 键 输 入 。 例 如 : 


2 光 2 -5 


22 22 2 


41 15 54 43 


3 二 20 3 


区 位 码 不 足 八 位 的 ， 击 空格 键 表示 编码 结束 。 
九 简 码 输 人 


上 节 所 介绍 的 汉字 的 字母 码 ， 一 律 码 长 为 四 〈 字 根 数 大 于 等 于 四 的 用 四 个 字母 码 ; 字 根 为 三 
的 补 一 个 识别 码 也 为 四 个 字母 码 ; 字 根 数 为 二 的 补 一 个 识别 码 , 再 补 上 一 个 空格 键 就 仍 是 四 键 ; 键 
面 字 也 一 律 用 四 码 y》， 为 了 简化 输入 ， 减 少 码 长 ， 设计 了 简 码 输入 法 。 简 码 分 一 、 二 、 三 级 ， 分 别 
只 需 击 一 个 、 两 个 、 三 个 字母 键 再 击 一 个 空格 键 来 输入 简 码 汉字 。 由 于 键盘 上 的 字母 键 只 用 到 了 
25 个 , 那么， 一 级 简 码 字 可 以 有 25 个 ,二 级 简 码 字 可 以 有 25X25 个 ,三 级 简 码 字 就 可 以 有 25 久 
25X25 王 15625 个 ， 然 而 经 过 实用 性 筛选 实际 上 三 级 汉字 只 安排 了 约 4400 多 个 ， 简 码 字 总 数 约 为 
5000 个 。 

1 一 级 简 码 

一 级 简 码 ， 也 常 称 为 高 频 码 。 五 笔 字 型 中 ， 从 11 一 55 共 25 个 键 位 代码 ， 根 据 每 键 位 上 的 字 
根 形态 特征 ， 每 键 安排 一 个 常用 的 高 频 汉 字 ， 这 类 字 只 要 击 键 一 次 ， 再 加 击 一 次 空格 键 ， 即 可 输 
入 ， 这 些 高 频 字 及 编码 如 下 ; 

一 11 (G) 地 12 (CF) 在 13 (D) 要 14 (S) 工 15 (A) 
上 21 (H) 是 22 (J) 中 23(CK) 国 24(L) 同 25 (M) 
和 31 (T) 的 32 (R) 有 33(E) 人 34(W) 我 35(Q) 
主 41 (Y) 产 42 (U) 不 43 (TD 为 44 (DO) 这 45 (P) 
民 51 (N) 了 52 (B) 发 53 (V) 以 54(C) 经 55 (X) 


2 二 级 简 码 
二 级 简 码 字 的 简 码 的 前 两 位 相同 ， 即 只 用 前 两 个 字 根 编码 。 二 级 简 码 字 表 如 下 
GFDSA HIJKLM  TREWQ YUIOP NBVCX 
5 
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G 11 五 于 天 末 开 ”下 理事 画 现 。” 玫 珠 表 珍 列 ， 玉 平 不 来 与 屯 玫 到 互 
F 12 二 寺 城 霜 载 ” 直 进 吉 协 南 ， 才 垢 圾 夫 无 ，” 坟 增 示 赤 过 志 地 雪 支 
D 13 三 夺 大 厅 左 。， 丰 百 右 历 面 ，” 帮 有 原 胡 春 克  ， 太 磁 砂 灰 达 成 顾 肆 友 龙 
S 14 本 村 枯 林 械  ” 相 查 可 楞 机 “， 格 析 极 检 构 “，” 术 样 档 杰 棕 “ 杨 李 要 权 梢 
A 15 七 革 基 苛 式 ”” 牙 划 或 功 贡 功 区 菜 共 区 苏 燕 东 芝 ， 世 节 切 划 药 
H 21 睛 睦 “ 果 虎 止 旧 占 卤 贞 ，” 睡 肯 具 餐 ”了 眩 瞳 步 上 频 ” 卢 眼 皮 此 
本 22 量 时 晨 果 虹 “ 早 昌 蝇 曙 遇 。 昨 蝗 明 蛤 晚 ” 景 暗 晃 显 晕 。” 电 最 归 紧 昆 
K 23 旺 叶 顺 果 呀 ”中 虽 吕 另 员 呼 听 吸 只 路 暗 吵 吐 叫 啊 哪 吧 哟 
L 24 车 轩 因 困 四 辊 加 男 轴 。 力 斩 胃 办 罗 罚 较 边 思 轨 轻 累 
M 25 同 财 央 共 曲 ”由 则 畦 册 ， 几 贩 骨 内 风 凡 赠 峭 迪 岂 邮 风 
一 3 生 行 知 条 长 ”处 得 各 务 向 笔 物 秀 答 称 ”入 科 秒 秋 管 ”，” 秘 季 委 么 第 
R 32 后 持 拓 打 找 ”年 提 扣押 抽 ， 手 折 扔 失 换 ， 扩 拉 朱 搂 近 所 报 扫 反 批 
E 33 且 肝 采 肛 。 胆 肿 肋 肌 用 遥 朋 脸 胸 ”及 胶 膛 爱 有 电 服 妥 肥 脂 
W 34 全 会 估 休 代 ”个 介 保 个 仙 ”用 琐 朋 脸 胸 ” 信 们 偿 伙 亿 他 分 公 化 
Q 35 钱 针 然 钉 氏 “外 旬 名 甸 负 儿 铁 角 欠 多 久 匀 乐 炙 锭 包 办 争 色 
Y 41 主 计 庆 度 ”让 刘 训 为 高 放 诉 衣 认 义 ， 方 说 就 变 这 记 离 良 充 率 
U 42 闻 半 关 亲 并 产 间 部 曾 商 “” 产 辩 前 闪 交 六 立 冰 普 帝 ， 记 离 良 充 率 
TI 43 汪 法 尖 酒 江 让 刘 训 为 高 少 泊 肖 兴 光 ” 注 洋 水 淡 学 ，” 沁 池 当 汉 涨 
O 44 业 灶 类 灯 煤 ，” 粘 烛 炊烟 灿 “” 烽 煌 粗 粉 雹 ，” 米 料 炒 炎 迷 断 籽 娄 烃 
P 45 定 守 害 宁 宽 和 寂 审 官 军 宙 ，， 客 宾 家 空 宛 。 社 实 宵 灾 之 “” 官 字 安 它 
N 51  ， 怀 导 居 民 ， 收 慢 避 己 届 必 怕 愉 懈 心 习 悄 屡 忱 “， 忆 敢 恨 怪 尼 
B 52 卫 际 承 阿 陈 ，” 耻 阳 职 阵 出 降 孤 阴 队 隐 防 联 孙 耿 辽 也 子 限 取 陛 
V 53 姨 寻 姑 杂 毁 。 旭 如 映 九 奶 婚 妨 嫌 录 灵 巡 ， 刀 好 妇 妈 姆 
C 54 对 参 戏 台 劝 观 侨 牟 能 难 允 ”了 驻 驴 马 邓 艰 双 
X 55 线 结 项 红 引 旨 强 细 纲 ， 张 绵 级 给 约 。，” 纺 弱 纱 继 综 ，” 纪 弛 绿 经 比 

3 三 级 简 码 


三 级 简 码 字 字 数 多 ,输入 三 级 简 码 字 也 需 击 四 键 〈 含 一 个 空格 键 ), 三 个 简 码 字母 与 全 码 的 前 
三 者 相同 ， 但 用 空格 代替 了 末 字 根 或 代替 识别 码 。 

三 级 简 码 看 上 去 击 键 次 数 昌 仍 为 四 键 ， 没 有 减少 总 的 击 键 次 数 ， 但 由 于 省 略 了 前 三 个 字 根 之 
后 的 字 根 判定 或 者 交叉 识别 码 的 判定 ， 所 以 提高 了 编码 速度 。 

十 词语 输 人 

在 汉字 输入 方法 中 ， 以 词语 为 单位 的 输入 方法 通常 可 达到 减少 码 长 ， 提 高 效率 的 目的 。 在 五 
笔 字 型 输入 方法 中 也 设计 了 词语 的 输入 方法 , 并 给 出 开放 式 结构 , 以 利于 根据 需要 自行 组 织 词 库 。 
五 笔 字 型 词语 输入 还 有 一 个 特点 ， 即 词语 输入 和 单字 输入 统一 ， 不 加 字 或 词 的 输入 区 分 标记 也 无 
需 用 特殊 的 键 换 档 。 这 是 由 于 词语 的 编码 也 是 四 码 。 全 部 四 码 空间 的 大 小 约 39 万 , 而 一 二 级 汉字 
单字 编码 〈 含 简 码 ) 共 1， 2 万 左右 , 大 量 编码 空间 空闲 着 。 词 汇 码 绝 大 部 分 都 播 在 了 闲置 空间 中 。 
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然而 单字 码 与 词汇 码 虽 有 着 很 不 相同 的 分 布 规律 ， 但 二 者 却 能 混在 一 起 而 不 用 换 档 区 分 ， 且 绝 大 
多 数 情况 下 是 不 会 发 生 冲突 的 。 单 字 与 词汇 编码 可 以 共存 共 容 互 不 影响 ， 词 汇 码 的 输入 和 单字 码 
的 输入 可 以 混合 进行 。 记 得 住 词 汇编 码 的 就 打 词汇 以 求 其 快 ， 记 不 清 的 仍 打 单 字 以 求 其 准 。 二 者 
之 间 不 需要 任何 的 换 档 操作 。 这 种 设计 在 实际 应 用 中 ， 给 操作 者 带 来 了 极 大 的 方便 。 
1 二 字 词 

二 字 词 的 词语 由 所 含 的 两 个 汉字 各 取 两 个 字 根 码 组 成 ， 即 每 个 字 按 笔顺 有 取 前 两 个 字 根 为 编 
码 ， 如 : 


简化 : 竹 门 { 已 TUWX 继续 ， 红 米 红 十 “XOXF 
计算 , 空 十 竹 目 YFTH 许多 : 半 ) 夕 久 YTQQ 
2 三 字 词 
前 两 个 汉字 各 取 一 码 ， 最 后 一 字 取 前 两 码 。 如 : 
电 冰 箱 : 日 了 竹 木 JUTS 电视 机 : 日 了 木 几 JPSM 
操作 员 : 了 1{ 口 贝 RWKM 洗衣 机 :， ? 一 木 几 IYSM 
3 四 字 词 
四 字 词 的 词语 由 每 个 汉字 的 第 一 码 组 成 词语 的 输入 码 。 如 ; 
知识 分 子 : 矢 闲 八 子 TYWB 日 理 万 机 : 日 王 厂 木 JGDS 
社会 主义 : 人 、、 PWYY 程序 设计 : 禾 广 了 1 TYYY 
4 多 字 词 
超过 四 个 字 的 词 ， 前 三 个 字 各 取 第 一 个 字母 码 ， 词 语 码 的 第 四 码 是 由 最 末 一 个 汉字 的 首 码 组 
成 。 换 名 话说 : 是 由 一 、 二 、 三 和 末 四 个 汉字 的 第 一 个 字母 构成 的 。 如 ; 


有 志 者 事 竞 成 ; 厂 士 土 厂 DFFD 
汉字 输入 技术 : ? 汪 车 木 IPLS 


十 一 ， 重 码 和 容错 码 的 处 理 


1 重 码 处 理 

从 输入 、 打 字 的 要 求 看 ， 键 位 要 尽量 少 ， 码 长 要 尽量 短 ， 重 码 也 要 尽量 少 ， 这 自然 不 是 一 件 
容易 的 事 。 五 笔 字 型 方案 中 对 重 码 字 也 用 在 提示 行 中 编号 显示 的 办 法 ， 让 用 户 按 最 上 排 的 数码 键 
选择 所 用 的 汉字 。 为 了 提高 速度 ， 还 做 了 以 下 处 理 : 

1. 当 屏 幕 编号 显示 重 码 字 时 ， 按 字 的 使 用 频率 排列 ， 高 频 字 在 第 一 号 位 ， 当 高 频 字 排 在 1 号 
位 时 ,还 响 铃 报 警 ， 此 时 ， 只 要 继续 输入 下 面 一 个 字 ，! 号 字 就 会 自动 跳 到 屏幕 光标 处 ， 这 样 可 以 
减少 一 次 数码 选择 的 操作 。 

2. 对 于 国标 一 级 汉字 中 的 重 码 , 把 常用 的 字 仍 按 常 规 编码 , 对 较 不 常用 的 那个 把 来 码 改 为 工 ， 
做 为 一 个 容错 码 ， 使 一 级 汉字 中 的 重 码 字 ， 大 多 可 以 实现 无 重 码 输 入 。 
2 容错 码 

容错 码 的 “ 容 ” 有 两 种 含义 ， 一 是 “容易 ” 搞 错 的 容 ， 另 一 个 是 “容许 ” 搞 错 的 容 。 在 实际 
编码 中 常会 出 现 种 种 差错 ， 许 多 差错 的 产生 有 其 原因 ， 带 有 普遍 的 易 发 性 。 容 错 码 的 设计 是 一 种 
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“因势利导 ”的 办 法 ， 即 承认 那些 容易 写 错 的 码 产 生 的 合理 性 ,把 它们 做 为 一 类 正常 的 可 以 用 的 码 
保留 。 使 那些 和 规则 不 完全 相符 的 〈 有 错误 的 ) 码 也 可 以 正常 使 用 ， 从 而 简化 过 程 ， 避 免 键 入 错 
码 后 找 不 到 所 需 的 字 ， 费 时 费力 地 重 打 。 五 笔 字 型 软件 的 第 四 版 中 有 容错 码 500 个 ， 有 以 下 类 型 ; 

1， 拆 分 容错 

动 : 二 A 力 (对 ) 一 云 力 (容错 ) 

2， 字 型 容错 

右 : 庆 口 12 (对 ) 六 口 13 (容错 ) 

3.， 软件 版 本 容错 

已 熟悉 老 版 本 打 法 的 用 户 可 把 老 版 本 中 已 改 掉 的 码 作为 容错 码 输入 。 异 体 容 错 


按 字 根 :一 门 | 蕊 可 出 “ 迎 ”。 

4， 末 笔 容 错 

“化 ” 字 末 笔 可 取 折 〈L) 也 可 取 为 撤 〈) 几 )。 
5 笔顺 容错 

“长 ” 字 可 按 三 种 笔顺 输入 均 可 。 

6， 简 繁 容错 


如 按 繁体 字 输 入 “ 国 ”， 需 取 字 根 为 : 口 苹 口 一 亦 可 。 

7， 低 频 重 码 字 后 绥 

前 面 重 码 处 理 中 谈 到 , 把 重 码 字 低频 字 的 末 码 字 改 为 站 ,这 也 可 做 为 一 个 容错 码 看 待 。 如 : 喜 、 
嘉 的 正常 编码 是 FKUK ， 嘉 为 相对 频率 低 的 ， 就 定义 编码 FKUL 为 嘉 字 的 容错 码 。 


十 二 选择 式 易 学 输入 法 


在 学 习 了 键盘 区 位 表 之 后 ， 你 可 能 会 问 : 26 个 英文 字母 键 只 用 了 25 个 ， 还 有 一 个 “Z” 键 为 
什么 闲 着 不 用 呢 ? 

原来 ， 我 们 给 “Z” 键 派 了 很 重要 的 用 场 。 这 就 是 用 它 来 进行 “选择 式 易学 输入 ”。 因 为 是 用 
“Z” 键 实现 的 ， 有 时 也 叫 “Z” 功 能 或 “Z” 处 理 。 

当 由 于 对 键盘 字 根 不 太 熟 悉 或 者 对 某 一 汉字 的 拆 分 一 时 难以 确定 时 ， 一 切 是 “未 知 数 ” 的 字 
根 都 可 以 用 “2Z” 来 代表 。 在 一 个 汉字 的 字 根 输入 中 ,不 知道 是 第 几 个 字 根 ， 都 可 以 打 “Z” 键 代 
替 。 计 算 机 的 软件 设计 可 以 帮助 检索 出 那些 符合 已 知 字 根 代码 的 字 ， 将 汉字 及 其 正确 代码 按 两 个 
一 组 显示 在 提示 行 里 ， 根 据 这 些 字 在 提示 行 里 从 左 到 右 的 位 置 号 ， 打 键盘 上 的 数字 键 1、2， 即 可 
从 提示 行 中 选 出 需要 的 字 。 由 于 提示 行 中 的 每 个 字 后 面 都 显示 有 它 的 正确 代码 , 供 你 学 习 、 掌 握 。 

例如 : 要 打 入 一 个 “ 敬 ”， 而 又 记 不 清 第 二 个 字 根 该 怎么 打 ， 这 时 可 以 打 “+ Z 口 食 ”这 样 四 
个 键 ， 结 果 提 示 行 中 显示 出 “ 敬 AQKN ”, 这 表示 符合 刚刚 打 入 的 字 根 组 合 的 字 只 有 一 个 “ 敬 ”。 只 
要 再 按 一 下 数字 键 “1”,“ 敬 ” 字 就 自动 显示 在 正常 编辑 位 置 上 。 同 时 ， 可 以 从 提示 行 中 知道 ， 刚 
才 那 个 未 知 的 字 根 “ 和 ”在 “Q”( 即 35) 键 上 。 

在 打 入 “ 富 ” 字 时 ， 如 果 打 了 “人 汪 口 口 ” 之 后 对 于 最 后 的 识别 码 含 糊 不 清 了 ， 这 时 ， 也 可 以 
用 “Z” 来 代替 之 。 结 果 ， 提 示 行 中 也 只 有 一 个 “ 宫 ” 字 ,而 且 提 示 ， 最 后 的 识别 码 为 FE 〈12)。 这 
个 例子 ， 也 许 会 给 你 一 个 重要 的 提示 : 如 果 对 于 本 方案 的 “识别 码 ”觉得 使 用 不 方便 的 话 ， 就 不 
妨 把 全 部 的 “识别 码 ” 都 打 成 “Z”， 照 样 可 立即 在 提示 行 中 找到 所 要 找 的 字 。 既 然 如 此 方便 ， 又 
何必 学 习 识别 码 呢 ? 区 别 在 于 : 取消 识别 码 的 话 ， 每 个 字 至 少 要 多 打 一 次 键 才能 选择 出 来 ， 而 每 

17 


个 字 多 打 一 键 ， 是 要 影响 速度 的 。 

未 知 的 字 根 越 多 ， 选 择 的 范围 越 广 。 提 示 行 里 一 批 只 显示 两 个 字 ， 如 果 这 一 批 字 中 没有 需要 
的 字 ， 可 按 空格 键 就 再 显示 出 下 一 批 两 个 来 。 如 果 对 某 个 汉字 的 四 个 字 根 一 无 所 知 ， 就 将 四 个 代 
码 都 打 成 “Z”， 那 么 机 器 就 会 将 6763 个 汉字 从 头 到 尾 ， 顺 序 地 分 批 显 示 出 来 。 

选择 式 输入 还 有 一 个 特色 是 这 样 的 : 如 果 在 四 个 码 中 未 知 的 码 只 有 一 个 的 话 ， 人 允许 把 这 个 未 
知 码 随便 打 在 第 几 个 位 置 上 都 行 ， 都 可 以 很 快 找 到 所 要 的 字 。 举 例 来 说 ， 对 于 “ 照 ” 字 ， 假 设 现 
在 的 未 知 字 根 是 “ 刀 ”， 那 么 可 以 有 以 下 四 种 键入 查找 方法 

(1) 日 乙 口 心 〈2) 日 口 Z 心 (3) 日 口 心 Z (4) 乙 日 口 必 

然而 ， 以 上 每 一 种 打 法 ， 都 只 显示 “ 照 ” 和 “ 刚 ” 两 个 字 ， 当 然 极 易 选 择 。 这 样 处 理 的 好 处 
是 : 只 管 顺序 打 入 有 把 握 的 字 根 ， 而 把 未 知 的 放 到 最 后 打 就 行 了 ， 所 以 大 都 采用 第 〈3) 种 方法 。 

选择 式 输入 的 另 一 个 特点 是 : 所 有 符合 已 键入 字 根 的 字 ， 基 本 上 按 字 的 使 用 频率 顺序 显示 出 
来 的 。 比 如 ， 先 是 高 频 字 ， 后 是 二 级 简 码 ， 再 是 全 码 字 。 这 样 ， 一 般 情 况 下 选择 不 了 几 下 ， 就 可 
以 选 到 所 需 的 字 了 ! 

至 此 , 我 们 主要 讲述 了 五 笔 字 型 输入 法 的 基本 规则 和 使 用 , 对 于 您 来 说 , 更 重要 的 是 练习 、 练 
习 、 再 练习 。 学 会 五 笔 字 型 并 不 难 ， 可 是 要 想 达到 较 高 的 输入 速度 、 学 而 好 用 ， 还 需要 下 一 番 功 
大 
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练 习 一 


一 ”填空 
1 五笔 字 型 的 字 根 键盘 可 分 为 〈 ) 个 区 ， 每 个 区 分 为 〈 ) 个 位 。 
2 字 根 所 在 的 区 号 ， 一 般 都 与 字 根 的 第 《 ) 个 笔划 的 代号 一 致 。 
3 在 保证 字 根 最 佳 组 合 的 前 题 下 , 字 根 所 在 的 位 号 , 尽量 与 它 的 第 〈 ) 个 笔划 保持 一 致 。 
4 单 笔划 及 复合 笔划 “一 、 二 、 三 ”“ 由 、 乡 ”等 ,它们 的 笔划 个 数 与 所 在 键 的 (  ) 号 一 


致 。 

5“ 车 、 力 、 几 、 心 、 耳 ”等 ， 它 们 的 首 笔 代号 与 它们 所 在 的 ) 号 不 一 致 ， 因 而 是 少 
数 几 个 例外 。 

6 一 般 来 说 , 五 笔 字 型 字 根 的 前 两 笔 代 号 、 所 在 键 的 (  ) 号 , 以 及 打 键 时 手指 的 自然 序号 ， 
三 者 是 保持 一 致 的 。 因 此 ， 容 易 做 到 看 到 字 根 ， 就 知道 哪个 手指 ， 同 时 也 就 知道 按 哪 个 键 。 


二 对 以 下 的 26 个 常用 的 偏旁 部 首 做 结构 分 析 ， 并 完成 后 面 的 填空 题 。 
a 励 b 十 c 女 d 久 e 刀 f 力 g 马 h 己 
i 户 ji k 韦 1 犬 m 歹 n 戈 o 飞 p 瓦 
9 支 ! 父 s 手 .t 爪 u 欠 v 广 w 疗 


1 以 上 部 首 中 ， 编 号 为 ) 的 都 是 五 笔 字 型 的 基本 字 根 。 

2 以 上 部 首 中 ， 编 号 为 〈 ) 的 都 是 含 两 个 字 根 的 非 基本 字 根 。 

3 在 所 列 非 基 本 字 根 中 ,， 含 三 个 字 根 的 有 ( )， 含 四 个 字 根 的 有 ) 。 

4 在 第 2 题 中 属于 散 关 系 的 有 ),， 属 于 连 关系 的 有 ( ),， 属 于 交 关 系 的 
有 (人 5 

5 在 第 3 题 中 属于 散 关 系 的 有 ( )， 属 于 连 关系 的 有 )， 属 于 交 关 系 的 
有 (人 5 
三 分 析 题 后 给 出 的 汉字 的 字 型 ， 填 空 完成 下 列 各 题 

在 这 些 汉 字 中 ， 属 于 左右 型 的 有 ( ) 个 ， 属 于 上 下 型 的 有 ( ， )， 人 个， 属于 杂 合 型 的 有 
(  ) 个 。 


无 卡 严 矢 汉 进 反 左右 友 京 要 种 年 同 


练 : - 习 三 
一 填空 
1 有 两 笔划 的 成 字 字 根 的 编码 公式 为 〈 ) 。 
2 有 三 笔 或 三 笔 以 上 笔划 的 成 字 字 根 的 编码 公式 为 
3 含 四 个 或 多 个 字 根 的 键 外 字 的 编码 取 其 《 ) 个 字 根 的 编码 组 成 。 
4 不 足 四 个 字 根 的 汉字 ， 其 编码 由 ) 和 )、 最 后 补 一 个 〈 
) 组 成 。 
5 一 级 简 码 字 共 有 ) 个 ， 二 级 简 码 字 共 有 ( ) 个 ,三 级 简 码 字 


最 多 可 为 ) 个 ， 现 在 实际 给 出 了 大 约 《 人 


判断 下 列 论述 的 正 误 ， 正 确 的 标 yes ， 错 误 的 标 no。 
1 输入 含 两 笔 的 成 字 字 根 最 少 可 击 键 三 次 。 
2 输入 含 两 个 字 根 的 键 外 字 最 少 击 键 四 次 。 
3 输入 一 级 简 码 字 ， 只 需要 击 一 键 。 ( 
4 输入 三 级 简 码 字 ， 必 须 击 四 键 。 《 


邮 


SN 


三 “ 写 出 下 列 各 字 的 五 笔 字 型 编码 

站 E 上 攻 王 | 
牛 年 ee 
芝 人 
区 3 两 克 员 出国 呈 征 瑟 天 呈 网 国王 
0 
9 
交 | 
而 的 二 交 和 省 
毛 才 

下 三 
人 重 

和 | ee = 
面 上 | 下 -| 
发 下 的 
承 离 四 
汪汪 全 于 汪 于 汪 
民 切 


四 操作 实习 

1 将 给 出 的 短文 用 五 笔 字 型 法 按 字 方 式 反 复 输入 几 遍 。 
2 重复 输入 短文 ， 能 用 简 码 的 用 简 码 。 

3 重复 输入 短文 ， 能 用 词组 输入 的 用 词组 输入 。 


短 文 
机 械 英文 打字 机 出 现 后 ,迅速 产生 了 用 于 印刷 的 英文 排 铸 机 和 用 于 电报 通讯 的 英文 电 传 机 ,使 
西方 国家 开始 了 文字 处 理 机 械 化 时 代 一 一 打字 机 时 代 。 这 个 时 代 ， 汉 字 的 许多 缺点 暴露 得 充分 而 
又 严重 。 可 以 说 机 械 英文 打字 机 给 汉字 毅 过 丧钟 ， 数 次 把 汉字 推 向 被 审判 、 被 鞭 乓 的 席位 。 ， 
电脑 以 其 高 速度 、 高 智能 瓜 汉 字 于 水 火 , 为 汉字 信息 处 理 现 代 化 开 个 了 广阔 的 美好 的 前 景 。 使 
古老 的 汉字 有 可 能 随 着 信息 化 进程 而 发 展 。 
世界 范围 都 在 重新 认识 和 评价 汉字 。 


4 自己 选择 短文 不 断 练习 。 


中 西 文 浮 点 BASIC 使 用 手册 目录 


1 浮 点 BASIC 和 F BASIC 的 功能 比较 … 


1.1 浮 点 BASIC 的 特点 … 


2 BASIC 语言 基础 知识 … 


2.1 BASIC 语言 基础 知识 pp 
2.2 BASIC 程序 .ee 
2.3 常 量 和 变量 pe 
2.4 函数 ee 


(19) 
1.2 浮 点 BASIC 和 FF BASIC 人 9) 
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2.5 运 运算 符 和 表达 式 eeeoeoeeeoeoooeeeeeoseoooeoesosoeoesoeoeoeososoeeeoeeese 


2.6 几 个 有 特殊 意义 的 符号 …………… 


2.7 粮 国 sseceeeeooeeeeeeees 


2. 8 编写 程序 的 基本 方法 ee 

2. 9 指令 的 描述 方法 
3 BASIC 语言 指令 及 用 法 ee。 

3. 1 系统 实用 指令 


NEW 
CLS 
LIST 


RUN 
STOP 


eeeeeeeeeeeeseseesseseeeseeseseesee 
eeeeoeeeeoeeeoeoeeesoeosoeooeesoeesosoeoosoeoeosoeeoseoooeoseeeee 
eeeeeeeeseeseeseeeeeeeeseeeeeseeseeeeeee 
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eeeeeeeeeeeeeeeeseeeeeeeeeeeeeeeeeee 


CLEAR 
EDIT 


3 基本 指令 eeoosoesoosoeosososoeoeososoosoosooeesooosoesoooeooososoessoessoeooeoeeooooo 


eeeeeeeeeeeeeeee 


PRINT 


ee6eeeeeeeeeee 


eeeeeeeseeeeeeeeeeeeseeeseeeeeeeeeee 


〈20) 
(21) 
(21) 
《23) 
〈23) 
〈24) 


" (25) 


《25) 
《26) 


〈27) 
(27) 


〈27) 
〈27) 
〈27) 


。…。 (28) 


〈28) 
〈29) 


"， (29) 
， (29) 


《〈29) 


， (30) 


(30) 
(30) 
(30) 


… (31) 


(31) 
(31) 
(31) 


" (32) 


(32) 


899e 
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FOR … 工 O.…STEP.NEXT .ooeeeesioeooesooesooeoe sooeoooosooooooooovsooooo (34) 
3.3 数值 机 数 pe (36) 
3.4 字 符 函 数 ee (39) 


附 ” 表 

1 BASIC 机 内 字符 代码 表 

2 BASIC 出 错 信息 一 览 表 

3 国标 一 二 级 汉字 库 区 位 码 表 


1 浮 点 BASIC 和 FBASIC 功能 比较 
1.1 浮 点 BASIC 的 特点 
浮 点 BASIC 具有 微机 上 配备 的 BASIC 语言 的 基本 证 句 和 部 分 扩展 BASIC 语句 。 具 有 基本 语 
名 的 BASIC 被 称 为 标准 BASIC。 与 FBASIC 相 比 ， 浮 点 BASIC 的 特点 在 于 ， 计 算 能 力 较 强 ， 如 
整整 数 的 位 数 为 9 位 ， 实 型 〈 浮 点 ) 数 的 范围 是 土 102"， 可 以 进行 整 型 、 实 型 数 的 小 数 、 乘 方 、 开 
方 、 三 角 函 数 、 指 数 函数 、 自 定义 函数 的 运算 ， 其 能 力 完全 覆盖 中 学 教学 需求 。 浮 点 BASIC 设计 
时 参考 了 苹果 一 工 的 浮 点 BASIC， 使 用 操作 与 苹果 一 EBASIC 基本 相同 ， 有 兴趣 的 读者 可 参考 
《苹果 一 TBASIC 程序 设计 》( 北 京师 范 大 学 出 版 社 ) 一 书 。 裕 兴 还 在 苹果 一 EBASIC 的 基本 上 增 
加 了 FBASIC 中 的 音乐 指令 PLAY， 有关 的 音乐 设计 方法 ， 可 参阅 使 用 手册 《用 游戏 机 作曲 》。 
浮 点 BASIC 有 优点 也 有 不 足 ， 与 FBASIC 相 比 ， 编 辑 方式 为 行 编 辑 ， 而 不 是 全 屏幕 编辑 ， 没 
有 十 六 进 制 数 、 不 能 控制 卡通 .手柄 和 屏幕 定位 等 等 ,这 些 只 能 不 断 进 行 改进 .为 了 方便 有 FBASIC 
知识 的 人 学 习 浮 点 BASIC， 特 把 两 者 的 区 别 列 表 。 
1.2 浮 点 BASIC 和 FBASIC 比较 
两 者 在 规格 上 的 差别 可 参考 下 表 
表 1 浮 点 BASIC 和 FBASIC 比较 
功 能 浮 点 BASIC FBASIC 备 注 
字符 种 区 中 、 英 、 数 字 、 符 号 | 英 、 数 字 、 符 号 个 别 符号 不 同 
整数 〈 十 进 制 ) 士 999999999 士 32767 
整数 〈 十 六 进 制 ) | 无 &H0000 一 &KHFFFF 
实数 范围 下 1 
三 角 函 数 有 
指数 函数 有 
乘 方 开 方 ”| 有 
字符 串 长 度 0 一 90 | 
变量 名 长 度 人 只 识别 前 两 位 
行 最 大 容量 98 
行 号 范围 0 一 9999 0 一 65535 
一 行 多 个 语句 可 可 
编辑 行 编辑 全 屏幕 编辑 
画面 分 层 控 制 不 可 * 可 分 4 层 
分 辩 率 256X240 相同 
色彩 控制 不 可 x* 
两 者 相同 
操纵 器 控制 不 可 * 
卡通 控制 不 可 * 
打印 机 可 
: 表 示 暂 时 未 实现 


在 运算 符号 上 ， 两 者 之 间 的 差别 如 下 表 :; 
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表 2 运算 符 差别 比较 


浮 点 BASIC FBASIC 
有 
有 


指令 之 间 的 差异 可 用 表 3 说 明 。 
表 3 指令 之 间 的 差异 比较 


Ts 


FBASIC 
有 


不 需要 


系统 实用 命令 LOAD? 
EDIT 
LLIST 
LINPUT CLEAR ON SWAP 
LPRINT 


除 CLS 


基本 指令 


屏幕 控制 指令 


无 
有 
无 
MOVE 系列 指令 有 


武吉 让 过 汪汪 填 过 过 


三 角 函 数 SIN COS ATN TAN 

指数 对 数 函 数 EXP LOG 

开 方 取 整 函数 SQR INT 

自 定 义 函 数 DEF FN(X) 

字符 函数 HEXS$ LEFTS$ RIGHT MIDS$ 


INKEY $ 
除 FRE TAB 、PEEK 外 


特殊 函数 
卡通 控制 指令 


2 BASIC 语言 基础 知识 

本 章 是 为 想 从 本 书 开 始 学 习 BASIC 语言 的 读者 设立 的 。 有 关键 盘 操 作 和 超级 学 习 卡 的 知识 ， 
可 参看 《F BASIC 操作 手册 》。 有 下 BASIC 知识 的 读者 可 以 跳 过 这 一 章 。 从 本 章 开始 ， 如 不 特别 
指明 ， 凡 提 到 BASIC 这 处 均 指 浮 点 BASIC。 
2.1 BASIC 语言 基础 知识 

BASIC 是 十 分 浒 的 通用 计算 机 语言 ，BASIC 语言 是 一 种 高 级 语言 ， 所 谓 “ 高 级 ”是 指 编程 的 
难 易 而 言 ， 用 户 使 用 的 计算 机 语言 越 高 级 ， 需 要 了 解 计 算 机 的 硬件 和 系统 知识 就 越 少 ， 也 就 越 容 
易学 习 。BASIC 语言 主要 有 以 下 几 个 特点 : 

1.BASIC 语言 简单 易学 。 基 本 BASIC 只 有 17 个 语句 ， 语 句 和 指令 近似 英语 自然 语言 ， 而 其 
运算 符号 和 算式 同 数学 上 的 用 法 也 很 类 似 , 故 容易 理解 和 记忆 。BASIC 程序 结构 简单 ， 规则 也 少 ， 
易于 初学 者 掌握 。 

2.BASIC 语言 是 一 种 会 话 式 语言 ， 人 机 对 话 十 分 方便 。 用 户 可 随时 中 断 程 序 的 运行 ， 并 从 源 
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点 继续 执行 程序 。BASIC 语法 检查 比较 严格， 发 现 错误 可 通知 用 户 修改 。 

3. BASIC 语言 具有 立即 执行 方式 。 用 这 种 方式 可 直接 输入 指令 或 语句 ， 按 ENTER 键 〈 回 
车 ) 后 该 指令 或 语句 可 立即 执行 。 这 科 :! 方 式 有 利于 检查 调试 程序 。 

4.BASIC 语言 是 解释 型 的 ,用户 编 写 的 程序 叫 源 程序 存储 在 用 户 程序 区 中 ， 当 键入 程序 运行 
指令 RUN 后 ， 用 户 的 程序 被 逐条 的 解 释 ， 形 成 目标 代码 〈 机 器 语言 ) 供 计 算 机 执行 。 

顺便 说 一 下 ， 语 言 并 不 是 越 “高 级 :” 越 好 ， 一 些 程序 员 在 编程 序 时 ， 往 往 希望 可 直接 控制 计 
算 机 的 接口 、 外 设 等 ， 像 F BASIC 和 C 语言 都 提供 了 有 关 指 令 ， 这 类 语言 往往 被 称 为 “中 间 语 
言 >。 所 以 ， 在 学 习 计 算 机 语言 时 一 定 i 生 意 该 语言 的 局 限 性 。 


2.2 BASIC 程序 的 构成 
让 我 们 从 一 个 例子 说 起 。 
如 果 A=1，B=2， 求 A 二 B=? 
解 : 设 C=A 二 B 
故 C 王 1 十 2 
即 C=3 

把 这 个 例子 写成 BASIC 程序 如 下 : 
>10 LET  A=1 
盖 20 LET B=2 
>30 LET C=A 十 B 
>>40 PRINT“C 王 ”;，C 


>50 END 
>RUN ; ”表示 按 回 车 键 (Enter 或 RETURN) 
C 王 3 ; 屏幕 显 示 结 果 


程序 执行 的 过 程 是 : 先 让 A 取信 1, 再 让 B 取 值 2,， 然 后 让 C 取 A 与 B 之 和 ， 再 把 C 的 值 在 
屏幕 上 显示 (打印 ) 出 来 ,在 50 行程 序 结束 。 

上 述 例子 描述 了 BASIC 语言 的 写法 〈 构 成 ) 方法 。BASIC 语言 的 构成 规则 是 : 

1. 一 个 BASIC 程序 由 若干 个 程序 行 组 成 。 上 述 例子 是 由 五 个 程序 行 组 成 。 

2. 每 行程 序 都 有 行 号 。 上 述 例子 的 10、20、30、40、50 就 是 行 号 。BASIC 语言 的 行 号 范围 是 
0~9999。 行 号 可 以 连续 也 可 不 连续 。 行 号 之 间 可 以 插入 新 行 号 ， 在 新 行 号 下 写 入 的 新 语句 ， 可 自 
动 按 行 号 大 小 顺序 插入 到 相应 位 置 。 

3. 每 行程 序 由 语句 构成 。 语 句 又 由 指令 符 和 指令 体 构 成 。 上 述 例子 中 的 “LET、PRINT、 
END” 都 是 指令 符 。 上 述 例子 中 的 A=1、B=2、C=A 十 B、C 是 指令 体 。 如 LET  A=1 即 为 一 
个 语句 ， 每 行程 序 可 由 多 个 语句 构成 ， 语 句 之 间 用 冒号 隔 开 。 

4. 指令 符 作为 保留 字 ， 不 可 作为 变量 名 。 

5. 每 行程 序 必 须 “ 合 法 ”， 即 符合 语法 规则 。 


2.3 常量 和 变量 
1. 常量 
在 程序 执行 过 程 中 ， 常 量 保持 不 变 。 常 量 又 分 为 三 种 数据 类 型 
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(一 ) 整数 〈 整 型 数 ) 
整数 的 范围 是 士 999999999， 在 这 个 数 范围 之 外 ， 只 能 用 实数 表示 。 
(二 ) 实数 〈 实 型 数 ) 
实数 也 称 浮 点 数 ， 实 数 的 范围 是 十 10*， 一 个 在 9 位 数 之 内 的 整数 也 可 用 实数 表示 。 如 : 
8888.8， 用 实数 表示 可 写成 8. 8888X10:， 在 BASIC 语言 中 可 写成 : 8. 8888E 十 3。 实 数 表示 的 基 
本 格式 是 : 
士 X.X…X E 土工 
例 ” 式 中 最 左边 的 正 号 ， 可 以 省 略 。 
全 X 取 数字 0~9， 最 大 有 效 位 数 为 9 位 。 
@ 国 T 取 数 籽 0~9， 最 大 位 数 为 两 位 。 
@ 登 下 为 指数 符 ， 代 表 1X10 的 方 次 。 
(三 ) 字符 串 常数 
用 双 引 叶 对 “” 括 起 来 的 字符 序列 ， 称 为 字符 串 常数 . 字符 串 的 长 度 不 超过 90 个 字符 ， 汉 字 
不 超过 45 个 。 如 :“ 裕 兴 ”“YUXING”“1A234”、“A12B”、 都 是 合法 的 字符 串 常数 。 当 双 引 号 
对 中 内 有 空格 也 是 字符 串 常量 ， 称 为 空 串 。 注 意 : 字符 串 常 量 中 不 要 用 保留 字 ,， 也 不 能 用 双 引 号 。 
2. 变量 
在 程序 运 干 可 取 不 同 值 的 量 ， 称 为 变量 。 
变量 在 程序 运行 的 不 同时 刻 ， 可 以 取 不 同 的 值 ， 变 量 通 过 变量 名 表示 ， 变 量 名 的 构成 遵循 如 
下 规定 。 
(一 ) 变量 名 长 度 不 许 超过 90 个 字符 ， 但 只 有 前 两 位 有 效 。 
(二 ) 变量 名 的 第 一 个 字母 必须 是 英文 A 一 Z 中 的 一 个 。 
(三 ) 保留 字 不 得 作为 变量 名 或 变量 名 中 的 一 部 分 。 
变量 与 常量 对 应 ， 分 为 整 型 变量 、 实 型 变量 和 字符 串 变 量 。 
整 型 变量 可 表示 整 型 数 ， 实 型 变量 可 表示 实 型 数 ， 字 符 串 变量 可 以 表示 字符 串 常数 ， 字 符 变 
量 名 的 末尾 要 加 $ 符号 。 
在 任何 一 个 变量 参与 运算 时 , 必须 预先 福 赋 值 , 如 果 预 先 不 赋值 , 数值 变量 自动 被 赋 0 值 , 字 
符 串 变量 自动 被 赋 空 格 〈 值 )。 变 量 在 参与 运算 时 还 要 注意 变量 类 型 ， 整 型 变量 和 实 型 变量 都 是 数 
值 变量 ， 相 互 之 间 可 以 自行 转换 ， 即 变量 类 型 相 容 。 而 字符 串 变 量 属于 字符 变量 ， 与 数值 变量 不 
相 容 。 比 如 A=1，A$ 一“1”， 两 者 完全 不 同 ， 不 可 以 直接 进行 运算 ， 如 要 把 两 者 相 加 ， 须 采用 
如 下 方法 。 
>>10 A=1: A$=“1?”: B==VAL (Ay$) 
>>20 PRINT A 二 B 
>>RUN ; 运行 程序 
除 上 面 介 绍 的 变量 分 类 之 外 ， 变 量 还 可 分 为 简单 变量 和 数组 变量 ， 以 上 介绍 的 变量 都 是 简单 
变量 ， 数 组 变量 又 称 下 标 变量 ， 可 以 是 字符 型 的 也 可 是 数值 型 的 。 数 组 变量 相当 简单 变量 的 有 序 
集合 。 比 如 : A (D， 当 I 取 1，2， 3 时, 即 A (1)，A (2)，A (3)， 下 面 例 子 可 以 说 明 这 一 点 ; 
>10 A (1) =1: A (2) =2: A (3) =3 
>>20 Al=1，A2=2，A3 王 3 
> 六 30 B=A (1) +A (2) 十 A (3) 
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40 CC 十 Al 十 A2 十 A3 
>>50 PRINT B，C 


RUN 
6 6 
可 以 看 出 ， 数 组 变量 和 简单 变量 可 以 相互 蔡 代 ， 功 能 等 效 。 
数值 数组 表示 为 : 
AD 一 维 数组 〈 其 中 A 为 变量 名 ，I 为 变量 ) 
A (GT，yJ) 二 维 数组 
A (IT，J，K) 三 维 数组 
字符 数组 变量 


A$ (D，AS$ (JJ)，AV$ (LI，J，K) 
与 数值 变量 不 同 的 是 字符 数组 变量 的 取 值 是 字符 串 常量 。 
尽管 数组 变量 很 方便 , 并 可 取代 简单 变量 , 但 是 数组 变量 的 最 大 特点 是 要 占用 内 存 , BASIC 中 
规定 了 数组 的 最 大 取 值 个 数 。 
在 32K 用 户 内 存 之 下 ,一 维 数 组 最 大 为 A 〈255)， 二 维 数组 最 大 为 A〈80，80),， 三 维 数组 最 
大 为 A (18,，18，18) 。 在 实际 编程 时 二 维 、 三 维 数组 还 不 能 使 用 到 上 述 值 ， 如 用 到 上 述 值 ， 就 没 
有 程序 空间 而 无 法 编程 了 。 


2.4 困 数 

在 BASIC 程序 中 , 除 允 许 使 用 常量 、 变 量 之 外 , 还 允许 使 用 事先 规定 好 的 函数 ， 用 户 只 要 给 
出 函数 名 与 参数 ， 就 可 求 出 相应 的 函数 值 。 如 求 5 的 平方 概括 ， 可 调用 函数 SQR (5) 。 

函数 名 也 是 保留 字 ， 不 可 作为 变量 名 。 

函数 分 为 数值 函数 、 字 符 函 数 和 特殊 函数 。 

数值 函数 有 三 角 函 数 、 指 数 函数 、 对 数 函 数 、 随 机 函数 等 。 

字符 函数 有 类 型 转换 函数 、 字 符 串 长 度 函 数 等 。 

特殊 函数 有 FRE、TAB、PEEK 函数 ,，FRE 用 于 观察 内 存量 , TAB 用 于 格式 打印 ，PEEK 用 
于 读 内 存 数据 。 


2.5 运算 符 和 表达 式 
运算 符 分 为 算术 运算 符 、 关 系 运算 符 和 逻辑 运算 符 。 当 把 数据 类 型 相同 的 常量 、 变 量 和 函数 
用 规定 的 运算 符 连 接 起 来 就 构成 BASIC 表达 式 ， 分 述 如 下 ， 
1, 算术 运算 符 和 表达 式 
算术 运算 符 有 5 个 : 
十 ， 一 ，* ( 乘 )，/ ( 除 )， 人 + 〈 乘 方 用 和 代替 ) 
算术 表达 式 如 : 
5xA，10/5 
SIN(3. 1416) 十 15 ;SIN(X) 是 三 角 函 数 sin(x) 
2. 关系 运算 符 和 表达 式 
关系 运算 符 是 用 于 比较 两 个 常数 和 两 个 变量 的 符号 。 
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关系 运算 符 有 : 


关系 符 含义 
一 等 于 
< > 不 等 于 
左边 大 于 右边 
二 一 左边 大 于 等 于 右边 
到 左边 小 于 右边 
去 二 左边 小 于 等 于 右边 
关系 表达 式 如 : 
A>B，C<<=D 
3. 逻辑 运算 符 和 表达 式 
逻辑 运算 符 有 ， 
逻辑 符 含义 
NOT 非 
AND 与 
OR 或 
逻辑 表达 式 有 ， 
NOT A，A AND B,A OR B 
下 表 解 释 了 逻辑 运算 符 的 含义 


表 4 ”逻辑 运算 符 的 含义 


四 加 NOTA | AANDB | AORB 
0 


0 
0 
0 
I 


使 用 逻辑 运算 符 必 须 注 意 逻 辑 关 系 是 否 成 立 ， 因 为 符合 BASIC 语法 〈 规 则 ) 的 语句 ， 在 逻辑 
关系 上 并 不 一 定 正确 。 如 
IF A<0 AND A>l0 THEN 1000 
这 名 的 意思 是 ， 如 A<<0 与 A>0 成 立 ， 则 程序 跳 转 到 1000 行 。 可 以 看 出 既 要 小 于 0 又 要 在 于 的 
数 是 不 存在 的 。 但 是 从 语法 上 讲 ， 这 条 语句 在 BASIC 语言 中 是 合法 的 。 
4, 字符 串 运算 符 与 表达 式 
字符 串 运算 符 只 有 一 个 ， 即 逻辑 加 ， 
逻辑 加 含义 
灶 将 两 个 字符 串 连 接 起 来 
字符 串 运 算 的 “加 号 ”， 不 同 数学 中 的 加 号 ， 下 面 的 表达 式 是 合理 的 ; 
A$ 二 B$，A$ 十 “ASD” 


2.6 几 个 具有 特殊 意义 的 标点 符号 
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1 一 连接 号 
在 LIST 指令 中 使 用 连接 号 ， 可 把 任意 一 段 程序 调 出 来 。 如 ， 
LIST 100 一 200 ， 调 出 100 一 200 行 的 语句 


2 ， 过 号 

逗号 用 于 分 割 数据 ， 下 面 的 语句 是 合法 的 。 
例 1; INPUT  A，B，C 

例 2: PRINT A，B 

例 3;: DATA 10，20，30 

3 :冒号 


在 同一 行 号 下 写 入 一 条 以 上 的 语句 时 ， 两 条 语句 之 间 用 冒号 隔 开 。 如 : 
10 A=B 一 C:， PRINT  A 
4 ;分 号 
分 号 用 于 分 割 数据 ， 与 逗号 分 割 数据 不 同 ， 如 在 打印 语句 中 ， 用 逗号 隔 开 ， 打 印 结果 之 间 空 
7 格 ， 用 分 号 隔 不 空格 。 
5 ?号 
用 问号 代替 PRINT 
? A，B，C 等 效 于 PRINT A，B，C 


2.7 框图 

框图 是 编写 程序 的 工具 ， 优 点 是 直观 、 清 晰 、 易 慌 ， 便 于 检查 和 交流 。 框 图 为 了 粗 框图 和 细 
框图 , 粗 框图 用 于 规定 程序 的 功能 模块 , 细 框 图 用 于 编程 。 对 于 一 个 大 型 程序 , 框图 必 不 可 少 , 小 
程序 可 以 不 用 框图 ， 但 是 要 养 成 框图 习惯 ， 有 利于 编写 程序 的 条 理性 和 正确 性 。 分 析 别人 程序 往 
往 也 要 画 框图 ， 有 利于 分 析 借鉴 。 框 图 的 规定 是 约定 俗 成 的 ， 可 分 述 如 下 ; 


始 尾 块 : 表示 程序 的 开始 和 结束 


全 功能 块 ， 表示 完成 某 种 功能 
判断 框 ， 判 断 分 支 的 转向 
人 流向 线 ， 表示 程序 执行 的 方向 
@ OO 连接 圈 : 同一 图 代号 相同 的 圈 是 连通 的 


图 2.1 框图 的 规定 


2.8 编写 程序 的 基本 方法 
编写 程序 和 画 画 一 样 ,也 有 好 坏 高 于 低 手 之 分 。 一 个 优秀 的 BASIC 程序 ,在 同等 功能 的 条 件 
下 ， 应 该 结构 清晰 ， 可 读 性 强 ， 程 序 相 对 较 短 。 应 注意 以 下 三 点 ， 
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注意 目标 树 的 划分 ， 注 意 变量 名 的 设计 ， 注 意 子 程序 的 使 用 。 
1. 目标 树 的 划分 
编程 序 的 目的 是 解决 特定 问题 ， 这 个 问题 就 是 要 解决 的 目标 ， 究 竟 怎样 解决 方法 很 多 ， 即 实 
现 目 标的 途径 不 唯一 。 从 编程 的 角度 来 看 ， 通 常 将 一 个 问题 分 解 成 一 个 目标 树 ， 如 图 所 示 :， 可 以 
看 出 ， 目 标 树 是 分 层 的 ， 同 一 层 代 表 级 别 相 同和 相近 的 功能 ， 第 一 层 各 个 节点 之 下 有 第 二 层 ， 第 
二 层 对 第 一 层 的 节点 有 从 属 关 系 。 即 ， 第 二 层 节 点 是 第 一 层 相 应 节点 的 子 功能 。 这 种 从 属 关系 可 
人 以 一 直 递 推 。 但 是 ,对 BASIC 程序 ,这 种 分 层 层 不 宜 太 


多 ， 一 般 以 2 一 3 层 为 宜 
5 2. 变量 的 命名 
A 变量 的 命名 应 根据 目标 树 进行 。 比 如 , 第 一 层 用 A， 
了 B, 第 二 层 用 Al, A2…。 按理 第 三 层 应 用 Al1, Al12, 由 
A， 六 于 BASIC 只 识别 前 两 痊 ， 故 第 三 层 只 能 采用 其 他 命名 - 
法 ， 比 如, SA11,， AA12。 从 这 里 可 以 看 出 分 层 太 多 会 在 
图 2. 2 ”目标 树 示意 变量 命名 方面 带 来 困难 。 一 般 ， 在 第 三 层 安排 一 些 公用 
子 程序 。 
3. 子 程序 的 设计 
对 不 同 子 目标 A、B， 可 能 在 编程 序 时 有 很 多 相同 的 程序 ,把 这 些 相同 的 程序 抽出 来 ,写成 公 
共 子 程序 ， 供 不 同 的 程序 调用 ， 这 样 可 以 缩短 程序 长 度 ， 使 程序 结构 清晰 易 读 。BASIC 语言 设计 
了 专门 调用 子 程序 的 指令 ， GOSUB， 和 子 程序 返回 指令 ,RETURN。 


2. 9 指令 的 描述 方法 
在 介绍 指令 的 功能 之 前 ， 先 介绍 本 书 怎样 描述 指令 。 对 所 有 的 指令 都 采用 功能 、 格 式 、 缩 写 、 
解释 、 程 序 例 的 顺序 描述 。 各 部 分 的 作用 是 ， 
功 能 : 解释 指令 的 功能 。 
格 式 : 说 明 指令 构成 语句 的 书写 格式 ， 格 式 采 用 的 符号 和 字母 遵循 下 述 规定 
(一 ) 英文 大 写字 母 可 直接 键入 
(二 ) 中 括 弧 [] 内 的 内 容 可 任意 省 略 ， 中 括 弧 不 要 输入 到 语句 中 
(三 ) 大 括 弧 《} 内 的 内 容 可 任 选 一 项 
(四 ) 括号 、 逼 号 、 冒 号、 分 号 、 连 接 号 等 符号 ， 必 须 用 在 指定 位 置 
(五 ) 省 略 号 …… 表 示 在 一 行 范围 内 可 多 次 重复 相同 或 有 规律 的 内 容 
(六 ) 空格 作为 符号 ， 不 要 省 略 
(七 ) 引号 “” 中 的 内 容 是 字符 串 
〈 八 ) 键入 的 程序 最 左边 有 符号 之 ， 而 运行 结果 最 左边 没 符号 
( 九 ) 符号 代表 按 ENTER 或 RETURN 键 
其 他 有 关 语 法 内 容 ， 在 介绍 指令 时 介绍 。 
解释 : 详细 说 明 指令 功能 或 注意 事项 。 
程序 例 ; 知 党 的 程序 例子 和 执行 结果 。 由 于 程序 可 能 在 一 行内 显示 不 下 ， 这 时 应 不 改行 号 连续 
把 一 行程 序 输入 完 。 
缺 省 值 : 如 果 没 有 给 指令 指定 参数 ， 将 自动 以 缺 省 值 作为 参数 处 理 。 
注释 : 程序 注释 被 写 在 程序 的 旁边 ， 用 分 号 隔 开 
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3 BASIC 指令 和 用 法 
本 章 系统 地 叙述 指令 的 用 法 供 读者 查阅 。 本 章 采 取 的 写法 与 FE BASIC 手册 相同 。 


3,.1 系统 实用 命令 

NEW 

功能 , 清除 内 存 区 中 所 有 变量 和 程序 。 

格 式 ， NEW 

解 释 ; 执 行 NEW 指令 将 清除 用 户 区 内 存 已 有 的 程序 (用 户 自 编 的 程序 ) .用户 在 输入 新 程序 前 ， 

最 好 先 执行 NEW 指令 ， 可 避免 新 旧 程 序 混杂 。 

CLS 

功能, 清除 屏幕 并 使 光标 返回 左上 和 角 。 

格式 : CLS 

解释; 执行 CLS 后 用 户 程序 不 被 清除 ， 只 是 清除 屏幕 。 按 HOME 键 同 执行 CLS 作用 相同 。 

LIST 

功能 ,把 内 存 中 的 程序 按 行 号 大 小 ， 在 屏幕 上 列 出 。 即 列 程序 清单 。 

格 式 ; LIST  [m] [-- [n]] 

解 释 :; LIST 指令 的 作用 是 列 程序 清单 ， 当 程序 被 列 出 后 ， 可 较 容 易 发 现 错误 从 而 有 利于 修改 。 
利用 LIST 指令 ， 可 任意 列 出 所 想 看 的 昌 序 。 说 明 如 下 : 


LISTm ; 列 出 第 m 行 的 程序 

LISTm 一 ; 列 出 从 m 行 到 结束 行 的 程序 
LISTm 一 n ; 列 出 从 m 行 开始 到 nm 行 结束 的 程序 
LIST 一 n ; 列 出 n 行 之 前 的 程序 。 


程序 例 ， 参见 F BASIC 使 用 手册 第 四 章 LIST 指令 的 例子 。 

LLIST 

功能 , 把 内 存 中 的 程序 在 打印 机 上 打印 出 来 。 即 列 出 程序 清单 。 

格 式 ; LLIST  [m] [一 o]] 

解 释 :LLIST 的 操作 与 LIST 相同 , 不 同 的 是 前 者 将 程序 清单 列 到 打印 机 上 , 后 者 将 程序 列 到 屏 
幕 上 。 


功 能: 运行 内 存 中 的 程序 。 

格 式 ， RUN [mj] 

解 释 ; (一 ) 如 仅 键入 RUN， 从 头 开 始 执行 程序 。 
(二 ) “如 键入 RUNm， 从 m 行 开 始 执行 程序 。 


>>10 REM*RUNx ; 10 一 40 行 是 输入 的 程序 
> 之 20 PRINT “FAMILY” ; 分 号 可 使 打印 结果 联 在 一 起 
>>30 PRINT“BASIC>” 
>40 END 
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>>RUN 4 从 头 开 始 运行 程序 


FAMILY BASIC ; 运行 结果 
>RUN 30 ; 从 30 开始 运行 程序 
BASIC ; 运行 结果 
STOP 
功能 ,中 断 程 序 运行 
格 式 ; STOP 
解 释 ; (一 ) 在 调试 程序 时 , STOP 指令 很 有 用 。 在 程序 中 插入 STOP 指令 , 程序 运行 到 有 STOP 
指令 的 行 时 自动 停止 。 并 显示 : 
“BREAK IN XX9” ; X X 表 示 行 号 
这 时 可 以 看 程序 运行 结果 和 预想 是 否 一 致 ， 若 没 问 题 ,在 用 CONT 指令 继续 运行 程 
序 。 
(二 ) 键盘 上 有 Pause 键 ， 产 生 的 中 断 效果 同 STOP 指令 。 
程序 例 ， 参见 CONT 指令 。 
CONT 
功 ” 能, 让 被 中 断 的 程序 继续 执行 。 
格 式 ， CONT 
解 释 : (一 ) 当 程 序 被 STOP 中 断 时 ， 可 用 CONT 继续 执行 。 
(二 ) 当 程 序 出 错 给 出 错误 信息 时 ， 用 CONT 从 出 错 行 的 下 一 行 继续 执行 程序 。 
程序 例 ， 目的 是 了 解 STOP 和 CONT 的 使 用 ， 其 他 指令 不 理解 没关系 。 
例 1， >10 REMx*STOP * CONTx* 


例 2: 
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>20 FOR I=1 TO 10 
字 30 PRINT II 


之 40 STOP ; 程序 运行 到 这 一 行 停止 
>50. NEXT II 

>RUN 

1 ; 显示 结果 

BREAK IN 40 ; 程序 打 断 在 40 行 
>CONT ; 键入 CONT 

2 ; 运行 结果 

BREAK IN 40 ; 程序 打 断 在 40 行 


过 >10 PRINT“A? 
二 20 PTIN“Al?” 
盖 30 PRINT“A2? 


>RUN 
人 $ 运行 结果 

SYNTAX ERROR IN 20 ; 语法 错误 在 20 行 
>CONT ; 站 六 相关 和 


A2 


END 
功 能: 使 程序 结束 运行 。 
解 释 ， 人 如 程序 在 最 后 一 行 结束 可 以 不 用 。 
程序 例 ， 
>>10 REMx END* 
>20 INPUT A 
>30 PRINT A 
>40 IF A=10 THEN END  ， 程 序 结束 在 40 行 
>50 GOTO 20 
>RUN 
? 1 ; 输入 1 
1 ; 打印 结果 
? 10 ; 再 次 显示 问号 ， 要 求 输入 
10 ; 程序 结束 ， 不 再 显示 问号 
CLEAR 
功能: 清除 内 存 所 有 变量 的 值 。 
格 式 ， CLEAR 
解 释 : 数字 变量 清除 后 值 为 0， 字符 变量 变 为 空 。 
程序 例 ， 
>10 REMx* CLEAR * 
>20 Y=178 
>>30 A$ 一 “ASC?” 
>40 PRINT Y，AYf 
>>PRINT Y，Af 


178 ASC ; 运行 结果 
>CLEAR 
0 ; 变量 值 被 清除 


EDIT 
功能 , 按 行 编辑 修改 程序 。 
格 式 ; EDIT 行 号 
解 释 : 本 指令 只 可 编辑 行 号 所 指定 的 行 。 用 方向 键 、 删 除 键 和 空格 键 进 行 修 秋 , 完毕 后 键入 EN- 
TER 键 。 
SAVE 
功能, 把 内 存 的 内 容 存 到 磁带 上 。 
格 式 : SAVE“ 文 件 名 ” 
解 ” 释 : 内 存 中 的 程序 ， 不 能 长 期 保存 ， 需 要 长 期 保存 时 可 用 SAVE 指令 存 到 磁带 上 ， 每 次 存 入 
的 程序 形成 一 个 文件 。 
程序 例 ， 
>SAVE“TEST” ; 存 入 文件 
; 正在 存 入 
29 


SYS 


屠 坟 党 
祸 岂 伍 


匡 XEC 


功 能 : 
格 式 ， 
解释， 
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二 国 ; 存 入 结束 显示 光标 


: 将 磁带 上 的 文件 调 回 〈 输 入 ), 到 内 存 。 
: LOAD“ 文 件 名 ?” 
: (一 ) 文件 名 是 由 SAVE 指令 指定 的 文件 名 。 


(二 ) 执行 LOAD 指令 将 清除 内 存 原 有 的 程序 和 变量 。 


>LOAD 
;取出 磁带 上 的 第 一 个 文件 
之 国 ; 调 出 结束 
: 行 号 自动 增加 。 
;AUTO “”[m]，5En]. 


: 〈 一 ) 执行 AUTO 指令 ， 程 序 行 号 可 自动 增加 不 用 键入 。 


M:; 超 始 行 号 Ni: 行 号 增 量 ， 
(二 ) AUTO  M ; 从 第 M 行 开始 ， 行 号 增 一 为 10 
(三 ) AUTO，N; ; 从 第 M 行 开 始 ， 行 号 增 量 为 N 
(四 ) AUTO，N ; 从 当前 行 开始 ， 行 号 增 量 为 N 
(五 ) AUTO ; 起 始 行 号 为 10， 行 号 增 量 为 10 
(六 ) 在 当前 行 号 下 不 输入 内 容 ， 按 ENTER 键 可 从 AUTO 状态 退出 。 


: 用 于 断 电 保持 、 
: SYS 


: 〈 一 ) 在 每 次 按 游戏 机 复位 键 和 关机 之 前 ， 打 入 SYS 可 保持 用 户 程序 不 丢失 。 


(二 ) 在 F BASIC 中 执行 此 指令 ， 返 回 上 级 菜单 。 在 BASIC 中 执行 此 指令 显示 “ 断 电 保 
持 ”， 用 Pause 键 可 退回 系统 。 
(三 ) 要 此 指令 有 效 ， 卡 内 必须 装 两 节 7 号 电池 。 


执行 内 存 中 的 程序 。 

EXEC\ 文 件 名 

本 指令 对 中 丁 文 都 有 效 。 不 同类 型 的 文件 ， 用 扩展 名 区 别 。 特 定 的 文件 只 能 在 特 特定 的 
语言 环境 中 使 用 ， 如 语言 环境 不 对 ， 程 序 不 执行 。 扩展 名 含义 是 ， 


EXE ; 系统 可 立即 执行 文件 ， 可 在 BASIC 状态 下 执行 
BS ; FE BASIC BS V2. 1 源 程 序 文件 

BSE 》BS 可 立即 执行 文件 

V3 ; FE BASIC PLUS 和 V3 版 源 程序 文件 

V3E ; V3 可 立即 执行 文件 

BAS ; BASIC 源 程 序 文件 

BAE ; BASIC 源 程 序 文件 ， 可 立即 执行 


ASM ; 汇编 语言 文件 


COM ; 系统 文件 


LIB ; 库 文 件 

LOG ; LOGO 语言 文件 

C 5 C 语言 文件 

文件 名 可 用 4 位 字符 ， 扩 展 名 为 3 位 字符 ， 中 间 用 点 “.” 隔 开 。 格 式 是 : 
文件 名 . 扩展 名 


扩展 名 最 后 一 个 字符 是 正 ， 当 程序 调 入 内 存 后 可 立即 执行 。 原 先 存 入 的 程序 被 清除 。 

本 指令 只 在 BASIC 状态 〈 系 统 状 态 ) 下 执行 ， 如 要 运行 其 它 语言 文件 ,将 自动 进入 该 语 
言 ， 再 把 文件 调 入 内 存 。 

当 语 言 环 境 不 对 或 版 本 不 对 时 ， 自 动 给 出 错误 信息 。 


> 六 EXECNDI 了 将 DI.BAS 文件 调 入 内 存 
之 国 ， ; 调 入 结束 


功 能 , 将 文件 名 列表 显示 。 
格 式 ，DIR . 
解释 : 这 个 指令 作用 同 PC 机 DOS 中 的 DIR 指令 。 


劝 能 : 在 BASIC 中 调用 机 器 码 〈 指 令 ) 子 程序 。 

格 式 ; CALL 地 址 

解 释 : (一 ) 游戏 机 和 中 华 学 习 机 的 机 器 码 基 本 相同 ， 都 是 6502 指令 系统 。 
(二 ) 地 址 必须 是 十 进 制 的 。 
三) 可 调用 系统 中 现成 的 子 程序 ， 但 必须 知道 子 程序 的 入 口 。 
〈 四 ) 自 编 的 子 程序 必须 用 RTS 指令 返回 。 


程序 例 : 
盖 10 REM xx*CALL = 
之 20 PRINT“A” 
>30 CALL 41501 ; 发 出 “ 哪 ” 的 一 声 
>40，GOTO 10 ; 程序 只 能 用 STOP 中 断 
3.2 基本 指令 


基本 指令 是 编程 常用 的 指令 ， 系 统 实用 指令 也 可 用 于 编程 ， 与 系统 实用 ,,， “不同 的 是 基本 指 

令 如 不 给 参数 一 般 不 执行 。 指 令 和 函数 也 有 区 别 ; 指令 在 行 号 之 后 ， 函 数 在 指令 之 后 ,: 擂 - 般 函数 
可 以 被 赋值 ， 而 指令 不 可 被 赋值 。 
ET 工 
功 能 : 给 变量 赋值 。 
格 式 ; LET 变量 = [常数 、 字 母 、 字 符 串 和 表达 式 ] 
解 释 :〈 一 ) 赋值 是 把 等 号 右边 的 值 赋 给 左边 ， 左 边 必 须 是 变量 。 

(二 ) 等 号 右边 如 果 是 变量 ， 必 须 预 先 被 赋值 ， 未 赋值 的 数值 变量 自动 匡 “0” 值 ， 未 被 

赋值 的 字符 变量 自动 匡 “ 空 格 ” 值 。 
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(三 ) 等 号 两 边 变量 类 型 必须 相同 , 左 侧 是 数值 变量 右 侧 必须 是 数值 变量 , 左 侧 是 字符 变 
量 右 侧 必须 是 字符 变量 。 
(四 ) LET 可 以 省 略 。 


程序 例 ， 
>>10 REM*LETx- 
>20 A=10 ; 给 变量 A 赋值 
>30 B=A ; 给 变量 B 赋值 
>40 A$“CHINA 是 中 国 ”; 给 变量 Ag$ 赋值 
>>50 PRINT A，B，Ag ; 打印 结果 
>RUN ; .运行 程序 
10 10 CHINA 是 中 国 ; 运行 结果 
PRINT 


功能: 将 运行 结果 在 屏幕 上 打印 出 来 。 
格 式 ; PRINT 内 容 [ {*，,}》 内容 ] 
内 容 王 常数 、 变 量 、 表 达 式 、“ 字 符 串 ” 
简 写 :? 
解 释 : (一 ) 用 PRINT 可 在 屏幕 上 打印 出 程序 运行 结果 , 也 可 打印 出 字符 串 、 变 量 、 常 数 等 , 在 
变量 、 字 符 串 或 常数 之 间 揪 入 分 号 ， 可 以 饼 次 打印 ， 如 插入 逗号 ， 可 按 格式 打印 。 
(二 ) 屏幕 用 于 显示 打印 结果 时 分 为 三 个 区 ; 


一 区 : 1 一 ?7 列 二 区 : 8 一 15 列 三 区 :16 一 30 列 

程序 例 : 

>>10 REM x* PRINT x 

>20 PRINT Ai; B ; 变量 之 间 用 分 号 

>30 PRINT A，B ; 变量 之 间 用 逗号 

>RUN 

00 ; 变量 之 间 播 入 分 号 的 结果 

0 0 ; 变量 之 间 揪 入 逗号 的 结果 
LPRINT 


功能 : 将 程序 运行 的 结果 在 打印 机 上 打印 出 来 。 
格 式 ; LPRINT 内 容 [ {;，,) 内 容 ] 
内 容 一 常数 、 变 量 、 表 达 式 、“ 字 符 串 ， 
解 释 : 本 指令 与 PRINT 指令 功能 相同 ， 只 是 将 打印 结果 送 到 打印 机 。 
程序 例 ， 
>10 FOR I=48 TO 119 
>20 FOR J=33 TO 126 
>30 LPRINT CHRS$ (27); CHRS$ (DCHRS$ 0) 
>40 NEXT 本 
>50 NEXT II ; 将 汉字 字库 打印 出 来 
INPUT 
功 能: 在 程序 运行 期 间 从 键盘 接收 数据 。 
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格 式 ; INPUT [“ 字 符 串 ”,] [变量 ，…] 
解 释 ; (一 ) 执行 INPUT 指令 ， 机 器 等 待 从 键盘 接收 数据 ， 输 入 数据 后 才能 执行 下 面 的 指令 。 
(二 ) 当 INPUT 后 跟 字 符 串 ， 只 显示 光标 不 显示 问号 ， 当 INPUT 之 后 不 跟 字符 串 ， 显 
示 问 号 。 
(三 ) 给 多 个 变量 送 数 ， 数 据 可 用 逗号 隔 开 ， 也 可 一 个 一 个 输入 。 
(四 ) 输入 错误 显示 REENTER ， 要 求 重新 输入 。 
程序 例 ， 
>10 REMx* INPUTx 
>20 INPUT A$，A，B 要求 输入 数据 
>>30 PRNIT A$，A,，B 打印 数据 
>>40 INPUT“A”，A. 指令 后 跟 字符 串 
>RUN 
2?A，2，3 输入 数据 
A 2 3 
人 图 显示 “A”， 要 求 输入 数据 
GOTO 
功能 :, 让 程序 跳 转 到 指定 的 行 号 。 
格 式 : GOTO nn 
n : 表示 行 号 
解 释 : 本 指令 用 于 改变 程序 的 转向 ，n 指出 了 程序 的 跳 转 行 号 。 
程序 例 
>10 REM x* GOTO * 
>20 _ INPUT A 
> 之 30 PRINT A 
>40 GOTO 320 ; 程序 跳 回 20 行 要 求 再 次 输入 
GOSUB 
功能 , 转 入 指定 行 号 子 程序 继续 执行 。 
格 式 ; GOSUB n 
n ; 表示 行 号 
解 释 : 当 一 部 分 程序 被 频繁 调用 ， 若 反复 写 多 次 将 增加 程序 长 度 ， 这 时 可 把 频繁 使 用 的 一 段 程 
序 提出 来 作为 公用 程序 ， 每 次 执行 这 段 程序 时 可 用 GOSUB 调用 ， 这 种 公用 程序 是 子 程 
序 。 
程序 例 ， 参看 RETURN 
RETURN 
功能 : 从 子 程序 返回 。 
格 式 ; RETURN 
解 释 : RETURN 必须 与 GOSUB 联合 使 用 ，RETURN 只 能 返回 到 GOSUB 语句 所 在 行 的 下 一 
行 。 
程序 例 


字 10 REM >*GOSUB *RETURN * 
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功 能 ， 
格 式 : 
解 释 ， 


程序 例 : 


之 60 


A 王 A 十 1 


GOSUB 100 ; 调用 100 名 开始 的 子 程序 
B=B 十 1 ; 子 程序 返回 到 40 行 
GOSUB 100 ; 再 次 调用 子 程序 
END ; 子 程序 回 到 60 行 


>>100 PRINT A,，B 
>>110 RETURN 
IF~THEN 
根据 条 件 式 的 值 确定 程序 的 流向 。 
IF 条 例 式 THEN ( 行 号 ， 语 句 }》 


Cs) 
(= 


FOR 一 NEXT 
功 能 : 反复 执行 FOR 与 NEXT 之 间 的 程序 。 


格 式 : 


程序 例 ; 
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FOR 


eeeee 


条 例 式 是 表达 式 ， 表 达 式 可 以 是 算术 、 字 符 或 逻辑 式 。 
行 号 是 所 要 跳 转 的 行 号 。 


REM x IF~THEN x 
INPUT A 

IF _ A=9%99 THEN PRINT“END”，END 

PRINT A， ; 如 果 A 不 等 于 999，,THEN 后 的 
GOTO 20 ; 语句 均 不 执行 。 


变量 = 初始 值 TO 结束 值 STEP 步 长 


NEXT 变量 

解 ” 释 : (一 ) 变量 为 数值 变量 ， 称 为 循环 变量 。 初 始 值 、 结 束 值 和 步 长 均 为 整数 。 步 长 可 正 可 负 。 
(二 ) 省 略 STEP 步 长 ， 步 长 为 1， 即 步 长 的 缺 省 值 为 1。 

(三 ) FOR 表示 循环 开始 ，NEXT 表示 循环 结束 ， 两 者 需 配 对 出 现 。 如 : 


FOR I=1 TO 10 STEP 2 

PRINT 1 

NEXT 1 
当 程 序 执行 到 FOR 庄 句 时 , 先 把 循环 变量 I 置 为 1, 到 NEXT 工 语句 返回 FOR 。 
这 时 循环 变量 按 SIEP 规定 的 步 长 增加 ，STEP2 表示 步 长 为 2，I 增 加 2。 每 循环 
一 次 I 增 加 2， 当 I 大 于 10 后 循环 结束 ， 执 行 NEXT 下 一 条 语句 。 
多 后 果 循 环 先 内 后 外 ，NEXT 后 要 加 变量 。 


REM x* FOR 一 NEXY >* 

FOR I=1 TO 20  ，;， 三 重 循环 
FOR J=1l1 TO II 

FOR K=1l1 TO 可 

PRINT “X” ; 用 X 建立 图 形 


> 之 60 NEXT K 
>>70 PRINT ; PRINT 起 换行 作用 
>80 NEXT ] 

之 90 PRINT 

>100NEXT 1 


功 能: 把 写 在 DATA 指令 的 数据 读 出 来 。 
格 式 ， READ 变量 [， 变量 ， 变量 ， 5 ] 
解 释 ， READ 指令 和 DATA 指令 配对 出 现 。 
程序 例 ， 参见 DATA 


功能, 定义 读 指 令 所 需 的 数据 。 
格 式 ， DATA 常数 [， 常数 ， 常 数 ， 人 ] 
解释 :; (一 ) 当 常数 取 汉 字 时 ， 要 在 汉字 的 外 边 加 引号 。 字 符 和 数字 不 用 加 引号 。 
(二 ) DATA 语句 可 放 在 程序 的 任意 地 方 。 
程序 例 ， 
>>10 REM x*READ~DATA<x* 
>>20 FOR I=1 TO 5 
>30 READ Ag 
>40 PRINT AS 
>50 NEXT II 
>60 DATA“ 裕 兴 ”，“ 第 一 ”"，888,“,”，OK 
RESTORE 
劝 能 : 把 数据 DATA 中 的 指针 指向 第 一 个 数据 ， 使 DATA 数据 可 以 重新 使 用 。 
格式， RESTORE [ 行 号 ] 
解 释 ;: 当 数 据 要 重复 使 用 ， 可 用 本 指令 改变 指针 。 


>>10 REM x* RESTORE 
>>20 RESTORE 110 ; 指针 指向 110 行 
>>30 READ A 
>40 PRINT A 
二 50 RESTORE 110 ; 指针 指向 110 行 
>>60 READ B 
>>70 PRINT B 
之 100 DATA20 
>>110 DATA30 
REM 
功能: 注释， 供 阅读 程序 清单 时 参考 。 
格 式 , REM [注释 内 容 ] 
解 释 :; (一 ) 注释 长 度 不 得 超过 94 个 字符 。 


(二 ) REM 之 后 的 内 容 不 执行 。 


程序 例 ， 
盖 10 REM xx*REM* 
之 20 REM 裕 兴 
>>30 REMBASIC 
>RUN ; 运行 后 什么 都 没 显示 
DIM 
功 能 : 定义 数组 。 
格 式 ， DIM 变量 名 (ml [，m2 [，m3]]) [， 变 量 名 (Cnl1 [，n2 [，n3]]) ，………… ] 
解释 : (一 ) 数组 可 以 是 一 维 的 ， 可 是 二 维 的 ， 也 可 是 三 维 的。 二 维 以 上 的 数组 也 叫 和 矩阵 。 
(二 ) 数组 可 以 数值 型 的 也 可 是 字符 型 的 。 
(三 ) 一 维 数组 最 大 为 M (255)， 二 维 数 组 最 大 为 M (80，80) ,三维 数组 最 大 为 M (18， 
18，18)。 数 组 小 于 10 可 不 定义 。 
程序 例 : 
之 10 REM x DIM x 
>20 DIM A (20)，B (20，20) 
>>30 FOR I=1 TO 19 
>>40 FOR J=1 TO 19 
>>50 PRINT B (J，1) 
>>60 PRINT AD 
>70 NEXT 可 
>80 NEXT 1 
POKE 
功能: 把 数据 放 入 内 存单 元 。 
格 式 ; POKE 内 存单 元 地 址 ， 数 据 
解 ” 释 : (一 ) 内 存单 元 的 地 址 从 24576 一 32767， 为 8SK 。 只 可 在 此 范围 内 使 用 POKE 指令 。 
(二 ) 利用 本 指令 可 直接 修改 内 存 数据 。 
程序 例 : 参见 PEEK 函数 
PALY 
功能: 演奏 音乐 。 
格 式 ; PALY“ 音 乐 字符 ” 
解 释 : 有 关 PALY 的 使 用 参见 《用 游戏 机 作曲 》。 
3.3 数值 函数 
数值 函数 有 三 角 函 数 、 指 数 函 数 、 随 机 函数 等 ， 分 述 如 下 ; 
ABS 
功能; 取 一 个 数 的 绝对 值 。 
格 式 ;， ABSCX) 
解 释 : ABS(CX) 是 绝对 值 函 数 ,X 可 取 小 数 。 


程序 例 : 
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>10 PRINT  ABS( 一 41) 
>RUN 
41 ;运行 结果 
SGN 
功能 :测试 变量 的 符号 。 
格 式 ;SGN(X) 
解释 :利用 符号 函数 ,可 以 测量 变量 的 正 ` 负 和 和 零 。 
X>0 SGN(CX)=1 
X=0 SGN(X)=0 
X<0 SGN(CX)= 一 1 
程序 例 ， 
>>10 X=41 
>>20 GOSUB100 
>>30 X= 一 41 
>40 GOSUB100 
>50 X=0: END 
>100 PRINT SGN(CX) 
>110 RETURN 
>>RUN 
1 一 1 0 
RND 
功 能 :让 计算 机 随机 (随意 ?产生 数据 。 
格 式 :RND(CX) 
解 释 :RND(X) 是 随机 函数 ,可 在 X 的 范围 内 随机 发 生 9 位 数 的 数据 。 
程序 例 ， 
>>10 REMx*RNDx 
过 20 X 王 10 
>30 PRINT RND(CX) 
>40 GOTO 30 
INT 
功 能 :数据 取 整 。 
格 式 :INT(X) 
解 释 : 当 小 数位 数 较 多 ,可 用 取 整 函数 进行 取 整 。 
程序 例 ， 
盖 10 REM#*INT* 
. >>20 S=4678. 234 
>30 PRINT INT(S 十 0.5) ;四 舍 五 入 
>40 PRINT INT(Sx* 100 十 0.5)/100; 精 确 到 小 数 点 后 两 位 
>RUN 
4678 
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4678. 23 
SQR (X) 
功能: 取 一 个 数 的 平方 根 。 
格式;:SQR(X) 
解释 : 取 一 个 数 的 平方 根 ,X 必须 大 于 零 。 
程序 例 ; 
>>10 REM x* SQR(X) * 
>>20 PRINT  SQR(2) 计算 2 的 开 方 
>RUN 
1. 41421356 ;运行 结果 
EXP(X) 
功 能 : 求 e 的 X 次 方 。 
格 式 :EXP(X) 
解 释 :EXP(X) 是 指数 函数 ,可 求 e 的 X 次 方 。e 王 2.71828183 
程序 例 : 
>>10 REM xEXP(CX) x 
>>20 PRINT EXP(10) ; 求 e 的 10 次 方 
RUN 
22026. 4658 
LOG(X) 
功 能 : 求 以 自然 对 数 e 为 底 的 对 数 X 
格 式 :LOG(X) 
解 释 :LOG(X) 是 求 以 自然 对 数 为 底 的 对 数 ,如 求 以 10 为 底 的 对 数 , 需 用 换 底 
公式 。 
程序 例 ; 
>10 REMxLOG(X) * 
>>20 PRINT LOG(10) 
>RUN 
2. 30258509 
SIN(X)[COSCX) TAN(CX) .ATN(CX)] 
功 能 : 求 三 角 函 数 sin(x) 的 值 。 
格 式 :SINCX) 
解 释 : 三 角 函 数 的 参数 应 取 弧 度 值 ,角度 换算 成 弧度 的 公式 ， 
弧度 王 角 度 * 3. 14159/180 


程序 例 : 
>>10 REM x* SIN(X) * 
>>20 PRINT SIN(10x 3.14/180) 
>RUN 
0. 1736 
DEF FN 
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功 能 :用 户 自己 定义 函数 。 
格 式 ;DEF FN 变量 (参数 )= 数 学 表达 式 
解释 :( 一 ) 经 过 定义 的 函数 才能 调用 。 
(二 ) 自 定义 函数 的 值 为 实 型 量 。 
(三 ) 自 定义 函数 的 参数 ,只 许 有 一 个 。 
(四 ) 用 DEF FN 定义 一 个 函数 ,如 果 右 部 的 表达 式 中 有 错误 ,这 种 错误 在 首次 调用 时 才 
能 发 现 , 所 提出 的 出 错 行 号 为 调用 该 函数 的 程序 行 号 。 


程序 例 ; 
>>10 REM*DEF FNx 
>20 DEF FN AGCX)=100 
#X 十 5 
>30 PRINT A(l) 
> 之 RUN 
105 运行 结果 
3.4 字符 函数 
字符 函数 用 于 字符 处 理 ， 可 以 进行 数值 和 字符 的 转换 。 
CHRY$ 


功 能 :把 255 个 机 内 代码 转换 成 所 代表 的 图 形 。 
格 :CHR $ (X) 
解 桩 ， 在 设计 程序 时 ， CHR $ 函数 有 时 可 以 产生 特殊 效果 。 如 给 输出 的 字符 串 带 双 引号 , 可 利用 


CHR $ 函数 来 实现 。 
程序 例 ， 
10 REM*CHRS$ 交 
20 PRINT CHR $ (34);“ 裕 兴 ”;CHR $ (34) 
RUN 
“ 裕 久 旷 
STR $ 


功 能 :把 数值 数据 转 成 字符 型 数据 。 
格 式 :STRS$(X) 
解 释 : 有 时 需 把 数值 型 数据 转换 成 字符 型 数据 。 
程序 例 ， 
>>10 REM* STR* 
>>20 A=41:A 一 41 
>>30 A$=STRS$(A) 
>40 B$=STRS$(CB) 
>>50 PRINT A$ 二 B$……”A 十 B 
>RUN 


VAL 
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功能 :把 字符 型 数字 转换 成 数值 型 数据 。 
格 式 :VAL (字符 变量 ) 
解 释 :VAL 的 含义 与 FEBASIC 不 同 , 仅 可 把 用 字符 串 表 示 的 数字 转换 成 数值 型 数据 。 
程序 例 
>10 REM#*VALx 
>20 INPUT AS 
>30 A=VALCAS$) 
>>40 PRINT Ad$,A 
>50 GOTO 20 
LEN 
功 能 :计算 字符 串 的 长 度 。 
格式 :LEN( 字 符 表达 式 ) 
解释 :在 计算 字符 帅 长 度 时 ,空格 和 非 印刷 符 也 计算 在 内 。 字 符 串 长 度 不 超过 94。 
程序 例 : 
>>10 REMx*LEN* 
>20 A$=AS$ 十 “A?” 
> 之 30 PRINT,LEN(A$),A 
>>40 FRE ;显示 内 存 剩余 容 量 
>50 A=A+1 
>60 GOTO 20 


3.5 特殊 函数 
PEEK 
功能 :从 内 存 中 读数 数据 。 
格式:PEEK( 数 值 变量 ) 
解 释 :( 一 )PEEK 仅 从 内 存 中 读数 据 而 不 改变 内 存 的 值 。 
(二 )PEEK 和 POKE 的 作用 相反 。 
程序 例 ， 
>>10 REM xx POKE x* PFFK x 
>>20 D=0 
>>30 FOR  I=30000 TO 31000 
>>40 POKE 1I,D 
>50 D=D+1 
>60 RD=PEEK(I) 
>70 PRINT RD,D 
>80 NEXT II 
TAB(X) 
功能 :控制 光标 在 一 行 的 位 置 。 
格 式 :TAB(X) 
解 释 : 利 用 TAB 可 以 控制 定位 打印 ,TAB 取 值 为 1 一 25。 
40 


程序 例 ; 
| >>10 REM*TABx 
>20 FOR I=1 TO 25 
>30 PRINT TAB(GD);8; 
>40 NEXT II 
FRE 
功能 :确定 内 存 剩余 容 量 。 
格 式 ;FRE 
解 释 :FRE 实际 上 是 指令 ,不 可 把 FRE 赋值 给 一 个 变量 。 
程序 例 ; 
>>10 REM*FREx 
>20 FRE 
>RUN 
32254 ;内 存 有 32254 个 字 节 空余 
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局 书 四 | 于 | 一 | 一 | 一 | 一 
一 吓 rr 一 | 一 | 一 | 一 | 一 一 | 一 
四 |< 铺 | 钙 | 贡 | 一 | 一 | 总 四 | 所 | 品 | 福 | 攻 | 共 | 六 | 口 | 一 | 口 | 一 1 
车 
忆 忆 忆 忌 总 臣 司 尼 


(~ 
1 


鄙 二 
己 己 
辆 一 
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附 表 1”BASIC 机 内 字符 代码 表 


Ctrl 十 C 
Ctrl 十 P 


BELL 


42 


附 表 2 BASIC 出 错 信息 一 览 表 


BREAK 

SYNTAX ERROR 

OUT OF MEMORY 

CAN' T_ CONTINUE 

LINE BUFFER OVERFLOW 
ILLEGAL FUNCTION CALL 
OVERFLOW 

UNDERFLOW 

ILLEGAL QUANTITY 
EXPRESSION TOO COMPLEX 
UNDEFINED FUNCTION 
REDIMENSIONED ARRAY 
DIVIDED BY ZERO 

TYPE MISMATCH 

LINE TOO LONG 
STATEMENT TOO LONG 
NEXT WITHOUT FOR 
FOR WITHOUT NEXT 
RETURN WITHOUT GOSUB 
OUT OF DATA 

BAD LINE NUMBER 

BAD SUBSCRIPT 
INCORRECT STATEMENT 
ILLEGAL DIRECT 

TAPE IMO ERROR 

PRT ERROR 


出 错 信息 释义 


打 断 程序 运行 
语法 错误 

内 存 出 界 

不 能 继续 

行 缓存 区 溢出 
非法 函数 调用 
上 溢出 

下 溢出 

非法 数值 
表达 式 太 复杂 
调用 未 定义 函数 
数组 定义 重复 
用 0 做 除数 
数据 类 型 不 匹配 
一 行 字符 太 长 
语句 太 长 

有 NEXT 无 FOR 
有 FOR 无 NEXT 


有 RETURN 无 GOSUB 


数据 不 够 
行 号 错误 
数组 下 标 错误 
语句 错误 


不 能 用 于 立即 执行 方式 


磁带 录放 错误 
打印 机 连接 错误 
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0123456789 
160 “” 啊 阿 埃 挨 哎 唉 衷 铠 瘤 
161 东 铸 艾 碍 受 隘 鞍 氨 安 俺 
162 按 暗 岸 胺 案 及 昂 得 凹 歼 
163 赦 租 只 傲 奥 怀 澳 芭 拥 扒 
164 以 吧 秃 八 疤 巴 拔 踊 靶 把 
165 丰 坝 霸 罢 爸 白 柏 百 摆 佰 
166 败 拜 穆 斑 班 搬 扳 般 颁 板 
167 版 扮 拌 伴 六 半 办 绊 邦 帮 
168 郴 榜 膀 绑 棒 磅 蚌 镑 傍 谤 
169 苞 胞 包裹 剥 

0123456789 
170 “” 菏 雹 保 堡 饱 宝 抱 报 暴 
171 鹏 鲍 爆 杯 碑 翡 卑 北 辈 背 
172 贝 饥 倍 狐 备 惫 焙 被 桂 共 
173 本 每 崩 绷 走 泵 顺 进 逼 鼻 
174 比 郧 笔 彼 怕 划 项 毕 毙 感 
175 币 庇 靖 闭 沿 整 必 辟 壁 辟 
176 避 陛 粮 边 编 贬 扁 便 变 证 
177 办 辩 闪 遍 标 紫 原 表 鳖 束 
178 别 净 彬 逃 濒 滨 宾 按 兵 冰 
179 柄 两 秉 饼 炳 

0123456789 
180 ” 病 并 玻 菠 播 拨 钵 波 博 
181 勃 捕 铂 箱 伯 外 舶 脖 膊 渤 
182 泊 驶 捕 下 哺 补 埠 不 布 步 
183 德 部 怖 擦 猿 裁 材 才 财 皮 
184 踩 采 彩 菜 葵 餐 参 恤 残 贿 
185 惨 灿 苍 舱 仓 沧 藏 操 糙 模 
186 曹 草 厕 策 侧 册 测 层 蹦 插 
187 叉 厦 茶 查 奢 拒 察 岔 差 施 
188 拆 柴 针 搜 挨 蝉 狗 旋 缠 铲 
189 产 阐 申 昌 猩 

0123456789 
190 ” 场 尝 常 长 偿 肠 厂 敞 畅 
191 唱 倡 超 抄 钞 朝 嘲 潮 巢 吵 
192 炒 车 扯 撤 亿 彻 澈 郴 臣 辰 
193 尘 展 忱 沉 陈 趁 衬 撑 称 城 
194 橙 成 旺 条 程 惩 澄 诚 承 逮 
195 验 秤 吃 疾 持 且 池 迟 弛 驰 
196 耻 齿 侈 尺 未 翅 斥 炽 充 冲 
197 虫 崇 宠 抽 酬 团 跨 稠 悉 筹 
198 仇 绸 网 丑 臭 初出 柄 厨 足 
199 鳃 雏 浴 除 楚 

0123456789 
200 ” 础 储 意 搞 触 处 揣 川 穿 
201 橡 传 船 喘 串 疮 窗 幢 床 冶 
202 创 吹 炊 播 锤 垂 春 椿 醉 层 
203 淳 纯 萤 和 玲 绰 竟 欧 磁 峻 辞 
204 慈 资 词 此 刺 赐 次 聪 瓯 内 
205 细 从 丛 凑 粗 栈 艇 促 蹲 等 
206 审 摧 肉 催 脆 痒 粹 淳 滁 村 
207 存 寸 磁 报 搓 措 挫 错 搭 达 
208 答 准 打 大 呆 歹 傣 戴 带 殖 
209 代 贷 袋 待 如 
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国标 一 级 汉字 表 


0123456789 
210 息 耽 担 丹 单 韩 撞 胆 旦 
211 氯 但 凿 淡 诞 弹 蛋 当 挡 党 
212 荡 档 刀 换 蹈 倒 岛 实 导 到 
213 稻 惊 道 盗 德 得 的 路 灯 登 
214 等 输 慕 邓 堤 低 滴 迪 敌 币 
215 狄 涤 翟 病 抵 底 地 蒂 第 这 
216 弟 递 缔 颠 搞 演 碘 点 典 胡 
217 垫 电 个 甸 店 居 莫 淀 暴 厅 
218 中 肘 凋 刁 掉 吊 钓 调 跌 条 
219 碟 蝶 迭 谈 重 
0123456789 
220 “ 丁 盯 叮 钉 项 频 锭 定 订 
221 丢 东 冬 董 懂 动 栋 侗 届 冻 
222 洞 完 抖 斗 陡 豆 逗 意 都 叔 
223 毒 特 独 读 堵 睹 赌 杜 镀 肚 
224 度 渡 妒 端 短 锻 段 断 级 堆 
225 兑 队 对 墩 吨 蹲 敦 顿 围 钝 
226 盾 通报 哆 多 夺 才 躲 东 踩 
227 舵 制 情 随 蛾 峨 网 俄 额 讲 
228 娥 恶 厄 扼 过 鄂 俄 恩 而 儿 
229 耳 尔 饵 洱 二 
0123456789 
230 “ 藉 发 罚 生 伐 乏 阁 法 玻 
231 沙 帆 番 翻 樊 矶 钒 繁 凡 烦 
232 反 返 范 凰 犯 饭 泛 坊 芳 方 
233 肪 房 防 妨 仿 访 纺 放 菲 非 
234 啡 飞 肥 菲 诽 嘱 肺 废 沸 费 
235 芬 酚 吟 氛 分 纷 坟 禁 汾 粉 
236 奋 份 念 愤 烘 丰 封 枫 蜂 峰 
237 锋 风 疯 焰 因 冯 链 讽 奉 凤 
238 佛 否 夫 散 肤 孵 扶 拂 辐 幅 
239 氟 符 伏 俘 服 
0123456789 
240 ” 浮 涪 福 宰 弗 十 抚 辅 傣 
241 验 估 且 腑 府 腐 赴 副 材 赋 
242 复 传 付 阜 父 腹 负 富 计 附 
243 妇 缚 只 噶 嘎 该 改 概 钙 盖 
244 溉 干 甘 杆 柑 竿 肝 赶 感 秆 
245 敢 贺 冈 刚 钢 和 缸 肛 纲 岗 港 
246 杠 篇 上 皋 高 膏 羔 糕 搞 久 稿 
247 告 哥 歌 搁 姜 全 胸 疙 割 革 
248 葛 格 蛤 阁 隔 铬 个 各 给 根 
249 跟 耕 更 庚 费 
0123456789 
250 ”二 耿 梗 工 攻 功 恭 复 供 
251 躬 公 官 弓 巩 孙 拱 贡 共 钧 
252 勾 沟 苟 狗 垢 构 购 够 亭 菇 
253 咕 逢 估 沽 孤 姑 鼓 古 患 骨 
254 谷 股 故 顾 固 雇 刮 瓜 风寒 
255 挂 衬 乖 拐 怪 棺 关 官 冠 观 
256 管 馆 饶 惯 灌 贯 光 广 逛 瑰 
257 规 圭 硅 归 龟 装 轨 鬼 诡 癸 
258 桂 柜 跪 贵 剑 辊 滚 棍 锅 郭 
259 国 果 囊 过 哈 


0123456789 
260 ” 航 孩 海 氨 交 害 骇 栈 节 
261 邯 韩 含 涵 寒 函 践 罕 栓 撼 
262 捍 旱 功 悍 焊 汗 汉 夯 杭 航 
263 壕 蝴 训 毫 部 好 耗 号 浩 呵 
264 喝 荷 翘 核 才 和 何 合 盒 铬 
265 闵 河 泗 赫 褐 锣 锅 咽 黑 痕 
266 很 狠 恨 哼 享 模 衔 恒 友 哄 
267 烘 虹 鸿 洪 宏 弘 红 喉 侯 猴 
268 吼 厚 侯 后 呼 乎 忽 瑚 介 戎 
269 胡 果 狐 糊 潮 

0123456789 
270 “” 弧 虎 路 护 互 沪 户 花 哗 
271 华 独 滑 画 划 化 话 槐 徊 怀 
272 淮 坏 欢 环 桓 还 缓 换 患 唤 
273 次 烷 焕 澳 宦 幻 荒 慌 黄 碳 
274 蝗 簧 皇 凰 性 煌 晃 赐 居 谎 
275 灰 挥 辉 徽 恢 师 回 毁 悔 慧 
276 弄 惠 降 贿 秽 会 烩 汇 讳 诲 
277 绘 营 氏 婚 魂 浑 混 秀 活 伙 
278 火 获 或 惑 孝 货 祸 击 圾 基 
279 机 畸 移 积 笑 

0123456789 
280 ” 肌 饥 迹 激 计 鸡 姬 绩 缉 
281 吉 极 棘 辑 籍 集 及 急 疾 汲 
282 即 寻 级 挤 几 痛 已 获 技 划 
283 季 伎 祭 剂 性 济 寄 农 计 记 
284 既 鼠 际 妓 继 纪 嘉 柳 夹 佳 
285 家 加 莱 规 页 甲 钾 假 稼 价 
286 架 驾 嫁 歼 监 坚 尖 签 间 衣 
287 兼 肩 艰 奸 城 茧 检索 碱 奏 
288 拣 捡 简 俭 前 减 荐 槛 鉴 践 
289 贱 见 键 箭 件 

0123456789 
290 ” 健 舰 剑 钱 渐 溅 润 建 僵 
291 姜 将 浆 江 性 薪 桨 奖 讲 抱 
292 和 痪 降 茹 椒 礁 焦 胶 交 郊 浇 
293 骄 娇 嚼 搅 饺 矫 侥 脚 蒋 角 
294 饺 缴 绞 删 教 酵 轿 较 叫 容 
295 揭 接 皆 秸 街 阶 截 劫 节 枯 
296 杰 捷 睫 竟 洁 结 解 姐 戒 藉 
297 芥 界 借 介 疗 诚 届 巾 筋 斤 
298 金 今 津 襟 紧 锦 仅 阅 进 靳 
299 晋 禁 近 炊 浸 

0123456789 
300 “” 尽 劲 剂 兢 芭 睛 晶 鲸 京 
301 惊 精 醒 经 井 著 景 颈 静 境 
302 敬 镜 径 六 靖 竟 竞 净 炯 窒 
303 揪 究 纠 玖 韭 久 灸 九 酒 展 
304 救 旧 白 铀 咎 就 疯 鞠 拘 狙 
305 这 居 驹 菊 局 咀 矩 举 诅 聚 
306 拒 据 巨 具 距 路 锯 俱 句 惧 
307 起 剧 捐 鹏 娟 倦 眷 卷 绢 振 
308 搜 抉 掘 偶 局 觉 决 诀 绝 均 
309 菌 钧 军 君 峻 


0123456789 
310 ” 俊 竣 滩 郡 骏 喀 咖 卡 咯 
311 开 措 楷 凯 慨 刊 堪 勘 坎 砍 
312 看 康 慷 糠 打 抗 亢 迷 考 拷 
313 烤 擎 坷 苛 柯 棵 克 颗 科 亮 ， 
314 咳 可 渴 克 刻 客 课 肯 了 峭 星 
315 恩 坑 耽 空 丽 孔 控 抠 口 扣 
316 寇 枯 哭 刻苦 栈 库 裤 夸 垮 
317 挎 跨 腔 块 筷 侩 快 宽 款 匡 
318 私 狂 框 矿 眶 上 旷 况 亏 盔 好 
319 入 蓝 诗 魁 盆 

0123456789 
320 ”人 馈 愧 省 坤 昆 押 困 括 扩 
321 廓 阔 垃 拉 喇 蜡 腊 阁 啦 莱 
322 来 赖 蓝 禁 栏 拦 篮 阑 兰 泣 
323 调 措 览 懒 缆 烂 滥 琅 构 狼 
324 廊 郎 朗 浪 捞 劳 牢 老 佬 姥 
325 酷 烙 洲 勒 乐 雷 镭 蕾 舌 累 
326 偶 侈 擂 肋 类 泪 棱 楞 冷 悍 
327 梨 黎 篱 猩 离 漓 理 李 里 
328 鲤 礼 莉 功 更 栗 丽 历 励 砾 
329 历 利 傈 例 俐 

0123456789 
330 “” 讽 立 粒 沥 隶 力 璃 哩 俩 
331 联 莲 连 镰 廉 怜 涟 宿 剑 脸 
332 链 恋 炼 练 粮 凉 梁 梁 良 两 
333 辆 量 晾 亮 谅 撩 聊 僚 疗 煤 
334 容 辽 瀛 了 扬 儿 雇 料 列 裂 
335 烈 劣 猎 琳 林 磷 霖 临 邻 鳞 
336 淋 痕 赁 吝 擒 玲 鞭 零 龄 铃 
337 伶 羚 凌 灵 陵 岭 领 另 令 泻 
338 琉 榴 硫 饮 留 刘 瘤 流 柳 六 
339 龙 达 呢 乱 订 

0123456789 
340 ” 隆 荤 拢 陇 楼 类 搂 笨 漏 
341 陋 芦 卢 颅 庐 炉 据 卤 虏 鲁 
342 天 碌 露 路 赂 鹿 潞 禄 录 陆 
343 哮 驴 吕 铝 但 旅 履 屡 缕 虑 
344 氯 律 率 滤 绿 瘟 挛 挛 漆 卵 
345 乱 掠 略 抢 轮 伦 仑 沦 纶 论 
346 葛 螺 罗 逻 锣 第 骤 裸 落 洛 
347 骆 络 妈 麻 玛 码 蚂 马 骂 旷 
348 吗 埋 买 才 卖 迈 脉 瞒 饮 蛮 
349 满 蓝 曼 慢 漫 

0123456789 
350 “” 刘 芒 茫 盲 谍 忙 莽 猫 茅 
351 锚 毛 矛 锦 卯 茂 冒 帽 狗 贸 
352 么 玫 枚 梅 酶 每 煤 没 眉 媒 
353 锁 每 美味 麻 妹 媚 门 闷 们 
354 萌 殉 机 盟 锰 猛 梦 孟 上 醋 
355 靡 糜 迷 谜 弥 米 秘 觅 泌 蜜 
356 密 寡 棉 眠 绵 园 免 勉 娩 缅 
357 面 苗 描 瞄 世 秒 渺 庙 妙 项 
358 灭 民 报 亚 敏 伍 浆 明 蜡 鸣 
359 馈 名 命 请 摸 


0123456789 
360 “ 众 霜 模 膜 磨 摩 魔 抹 末 
361 莫 轴 默 沫 漠 实 陌 谋 件 某 
_ 362 拇 牡 亩 姆 母 天蓝 幕 募 幕 
363 木 目 时 牧 穆 拿 哪 呐 钠 那 
364 娜 纳 氨 乃 奶 耐 奈 南 男 难 
365 赛 找 脑 恼 闹 淖 呢 包 内 嫩 
366 能 妮 雪 倪 泥 尼 拟 你 匿 腻 
367 逆 油 项 牛 年 碾 捞 捡 念 娘 
368 上 酿 鸟 尿 捏 到 草 喘 凶 镍 湿 
369 您 柠 疗 凝 宁 

0123456789 
370 “” 拧 党 牛 扭 钮 纽 脓 浓 农 
371 弄 奴 努 怒 女 暧 虐 疙 挪 怪 
372 糯 诺 哦 欧 欧 贤 稿 哎 偶 涝 
373 嘲 趴 疏 帕 怕 琶 拍 排 牌 徘 
374 洲 派 攀 潘 盘 盘 盼 畔 判 叛 
375 兵 庞 旁 料 胖 抛 唤 刨 炮 袍 
376 跑 泡 吓 胚 培 裴 赔 陪 配 佩 
377 沛 喷 盆 寿 择 亮 澎 彭 芋 棚 
378 硼 篷 膨 朋 觅 摔 碰 坯 而 圳 
379 批 披 劈 研 吡 

0123456789 
380 ” 啤 脾 疲 皮 匹 瘤 个 屁 璧 
381 篇 偏 片 骗 飘 漂 标 票 撤 璧 
382 拼 频 贫 品 聘 乒 坪 苹 菠 平 
383 赁 瓶 评 屏 坡 泌 颇 婆 破 岂 
384 迫 粕 齐 扑 铺 仆 莆 葡 著 蒲 
385 博 朴 轩 普 浦 谱 曝 瀑 期 若 
386 栖 威 圳 七 次 漆 业 源 其 棋 
387 奇 岐 畦 崎 脐 齐 旗 祈 祁 骑 
388 起 出 乞 企 启 契 砌 器 气 迄 
389 弃 汽 泣 论 换 

0123456789 
390 ”人 恰 洽 音 插 针 铅 千 迁 签 
391 什 谦 乾 黔 钱 钳 前 潜 址 浅 
392 谴 拍 嵌入 娄 枪 哈 腔 羌 墙 
393 茧 强 抢 棍 匆 禹 悄 桥 上 乔 
394 侨 巧 精 援 竹 峭 俏 窃 切 茄 
395 且 尾 窃 钦 侵 亲 秦 琴 勤 芹 
396 擒 禽 窗 沁 青 轻 氢 倾 旺 清 
397 擎 晴 氰 情 项 请 庆 琼 穷 秋 
398 丘 邱 球 求 囚 商 泗 趋 区 蛆 
399 曲 躯 届 驱 渠 

0123456789 
400 ” 取 娶 上 趣 去 图 额 权 醛 
401 泉 全 疙 源 犬 券 劝 缺 抉 桨 
402 却 竟 权 确 省 裙 群 然 燃 冉 
403 染 狐 坏 扩 喷 让 侥 扰 绕 藻 
404 热 壬 仁 人 忍 韧 任 认 刃 妊 
405 幼 扔 仍 日 戎 攻 著 荣 融 熔 
406 溶 容 绒 宛 揉 柔 肉 茹 里 颂 
407 至 如 辱 乳 汝 入 福 软 阮 芒 
408 瑞 锐 闽 润 若 弱 撤 酒 萨 腮 
409 鲤 塞 赛 三 参 


国标 一 级 汉字 表 


0123456789 
410 “ 伞 散 桑 嗓 背 播 孜 打 嫂 
411 琴 色 湿 森 僧 东 砂 杀 刹 沙 
412 纱 傻 啥 邹 利 晒 瑞 若 杉 山 
413 删 炉 衫 闪 陕 擅 风 腾 善 汕 
414 扇 缮 丧 伤 商 赏 响 上 尚 并 
415 梢 朱 稍 烧 芍 勺 韶 少 哨 邵 
416 绍 奢 内 蛇 舌 会 赦 摄 射 慑 
417 涉 社 设 砷 申 唱 伸 身 深 刀 
418 绅 神 沈 审 妨 甚 肾 慎 渗 声 
419 生 复 和 性 升 绳 

0123456789 
420 “省 盛 剩 胜 圣 师 失 狮 施 
421 湿 诗 尸 乔 十 石 拾 时 什 食 
422 蚀 实 识 史 矢 使 尿 驶 始 式 
423 示 士 世 柿 事 拭 暂 逝 势 是 
424 嗜 噬 适 仕 侍 释 饰 氏 市 博 
425 室 视 试 收 手 首 守 寿 授 售 
426 受 首 兽 蔬 枢 梳 殊 抒 输 叔 
427 舒 淑 朴 书 赎 部 轨 薯 暑 咖 
428 署 唱 乘 鼠 属 术 述 树 柬 成 
429 竖 坚 庶 数 激 

0123456789 
430 “” 想 刷机 摔 训 甩 帅 栓 捡 
431 霜 双 爽 谁 水 翘 税 唤 瞬 顺 
432 盈 说 硕 朔 烁 斯 撕 呆 思 私 
433- 司 丝 死 肆 寺 册 四 伺 似 饲 
434 已 松 符 人 处 颂 送 宋 讼 诵 搜 
435 艘 找 嗽 苏 酥 俗 素 速 权 傈 
436 塑 澜 宿 诉 肃 酸 蒜 算 虽 隋 
437 随 绥 链 碎 岁 熏 遂 隧 崇 孙 
438 损 笋 球 梭 唆 缩 琐 索 锁 所 
439 塌 他 它 她 塔 

0123456789 
440 “” 儿 拓 踢 踏 胎 苦 抬 台 泰 
441 栈 太 态 汰 志 排 贪 肉 滩 坛 
442 檀 痰 潭 谭 谈 坦 千 祖 碳 探 
443 叹 炭 汤 塘 搞 堂 棠 腾 唐 糖 
444 倘 策 消 趟 逃 掏 涛 滔 丝 萄 
445 桃 逃 淘 陶 讨 套 特 茧 腾 疼 
446 痊 梯 剔 踢 镜 提 题 蹄 啼 体 
447 替 呈 惕 涕 剃 层 天 添 填 田 
448 甜 恬 生 用 挑 条 授 姚 跳 贴 
449 铁 帖 厅 听 烃 

0123456789 
450 “ 汀 廷 停 亭 庭 挺 艇 通 桐 
451 酮 暗 同 铜 彤 童 桶 捅 简 统 
452 痛 偷 投 头 透 凸 秃 突 图 徒 
453 途 涂 屠 土 吐 免 汕 团 推 预 
454 腿 晓 褪 退 吞 屯 导 拖 托 脱 
455 能 陀 驮 驼 椭 妇 拓 唾 控 哇 
456 蛙 洼 娃 瓦 袜 下 外 豌 恋 湾 
457 玩 顽 丸 烷 完 碗 挽 晚 崇 饮 
458 宛 婉 万 腕 汪 王 亡 枉 网 往 
459 旺 望 忘 妄 威 


0123456789 
460 “ 几 微 危 韦 违 检 围 唯 惟 
461 为 滩 维 革 萎 委 伟 擅 尾 续 
462 未 蔚 味 匡 胃 喂 魏 位 渭 谓 
463 尉 慰 卫 瘟 温 蚊 文 闻 纹 网 
464 稳 紊 问 喻 筑 从 挝 蜗 涡 窝 
465 我 堤 卧 握 沃 巫 网 钨 乌 污 
466 诬 屋 无 芜 梧 哥 吴 怒 武 五 
467 插 午 舞 伍 侮 坞 戊 雾 晤 物 
468 纪 务 悟 误 昔 中 析 西 硒 克 
469 晰 喀 吸 锡 牺 

0123456789 
470 “” 稀 息 希 悉 膝 夕 惜 煌 烯 
471 溪 汐 犀 橄 柳 席 习 媳 喜 铣 
472 洗 系 蔡 戏 细 辽 虾 匣 霞 辖 
473 忠 峡 侠 狭 下 厦 夏 吓 掀 钴 
474 先 仙 鲜 纤 咸 贤 衔 航 闲 涛 
475 弱 嫌 显 险 现 献 县 腺 馅 莱 
476 宪 陷 限 线 相 用 灸 香 箱 误 
477 湘 乡 翔 祥 详 想 响 享 项 埠 
478 橡 像 向 象 萧 硝 霄 削 暑 器 
479 销 消 宵 淆 晓 

0123456789 
480 “小 孝 校 肖 啸 笑 效 攀 些 
481 区 蝎 鞋 协 挟 携 那 斜 胁 谐 
482 写 械 外 秒 饥 泄 泻 谢 层 薪 
483 芯 锌 和 欣 辛 新 忻 心 信 上 几 星 
484 胆 狸 慢 兴 刑 型 形 邢 行 醒 
485 幸 杏 性 姓 兄 凶 胸 匈 测 雄 
486 能 休 修 盖 朽 嗅 锈 秀 袖 绣 
487 墟 成 需 典 吐 须 徐 许 营 酌 
488 叙 旭 序 畜 恤 絮 嫣 绪 续 轩 
489 喧 宣 悬 旋 玄 

0123456789 
490- 选 痊 眩 绚 靴 薛 学 穴 雪 
491 血 助 隔 循 句 询 寻 驯 巡 列 
492 汛 训 讯 逊 迅 压 押 瑰 鸭 呀 
493 丫 芽 牙 蚜 崖 衔 涯 雅 哑 亚 
494 诈 泪 咽 益 烟 淹 盐 严 研 星 
495 岩 延 言 颜 韶 炎 沿 这 掩 眼 
496 本 演 艳 直 燕 厌 砚 雁 哮 彦 
497 焰 富 谚 验 歌 央 惠 秧 杨扬 
498 伴 疡 羊 洋 阳 氧 仰 痒 养 样 
499 澜 邀 腰 妖 一 

0123456789 
500 “” 播 尧 窗 谣 姚 咬 回 药 
501 要 棍 椰 嘲 耶 条 野 冶 也 页 
502 掖 业 叶 抱 腋 夜 液 一 查 医 
503 拇 镶 依 伊 衣 颐 夷 遗 移 仪 
504 胰 疑 沂 宜 姨 三 椅 蚁 倚 已 
505 乙 侨 以 艺 抑 易 邑 屹 亿 役 
506 脐 饮 和 妾 疫 亦 裔 意 孝 忆 义 
507 益 滋 吝 议 谊 译 异 翼 翌 绎 
508 菌 萌 因 有 投 音 阴 姻 吟 银 淫 
509 寅 饮 尹 引 隐 


0123456789 
510 “ 印 英 栅 轴 座 应 组 莹 萤 
511 营 菊 蝇 迎 赢 盈 影 颖 硬 映 
512 哟 拥 佣 腾 儿 庸 雍 踊 晴 咏 
513 泳 涌水 天 勇 用 幽 优 艇 优 
51 如 尤 由 邮 催 犹 油 游 西 有 友 
515 右 佑 炎 诱 又 幼 迁 淤 于 孟 
516: 榆 眶 是 与 余 俞 傅 鱼 愉 渝 
517 渔 隅 予 娱 雨 与 屿 融 字 语 
518 羽 玉 域 苹 郁 吁 遇 响 峪 御 
519 愈 欲 狱 育 誉 

0123456789 
520 ” 浴 寅 裕 预 除 驭 移 渊 换 
521 元 士民 原 援 边 园 员 圆 猿 
522 源 缘 远 苑 愿 怨 院 日 约 越 
523 跃 钥 岳 粤 月 悦 阅 耘 云 郧 
524 匀 陨 允 运 草 酝 学 韵 孕 功 
525 砸 杂 栽 截 灾 宰 载 再 在 咱 
526 抠 暂 赞 峙 脏 非 遭 粳 凿 藻 
527 囊 早 澡 孟 躁 噪 造 皂 灶 燥 
528 责 择 则 泽 贼 怎 增 僧 曾 赠 
529 扎 嘲 渣 札 轧 

0123456789 
530 ” 铀 闸 是 栅 榨 咋 乍 炸 诈 
531 摘 裔 宅 窜 债 寨 瞻 秸 镶 粘 
532 沾 旨 斩 轻轨 展 芯 栈 占 战 
533: 站 湛 绽 樟 章 彰 漳 张 掌 涨 
534 杖 丈 帐 账 仗 胀 冶 障 招 昭 
535 找 沼 赵 照 单 兆 刻 召 遮 折 
536 哲 执业 者 钞 蔗 这 浙 珍 其 
537 真 早 砧 玛 贞 针 侦 枕 疹 诊 
538 震 振 镇 阵 蒸 挣 睁 征 狠 争 
539 伍 整 拯 正 政 

0123456789 
540 “ 帧 症 郑 证 芝 枝 支 叶 蜂 
541 知 肢 脂 汁 之 织 职 直 植 殖 
542 执 值 侄 址 指 止 趾 只 和 骨 纸 
543 志 挚 掷 至 致 置 帜 峙 制 智 
544 秩 稚 质 赤 峙 滞 治 室 中 忠 
545 忠 钟 衷 终 种 肿 重 仲 众 舟 
546 周 州 洲 询 粥 轴 肘 裔 咒 皱 
547 宙 姐 又 珠 株 蛛 朱 猪 诸 诛 
548 逐 竹 烛 煮 扩 瞩 嘱 主 著 柱 
549 助 星 贮 铸 筑 

0123456789 
550 ” 住 注 祝 驻 抓 爪 搜 专 砖 
551 转 撰 赚 繁 桩 庄 装 妆 挤 壮 
552 状 椎 锥 追 痪 坠 级 评 准 捉 
553 拙 卓 桌 琢 苗 酌 吸 着 灼 浊 
554 兹 咨 资 姿 滋 淄 孜 紫 仔 籽 
555 淳 子 自 站 字 肾 棕 踪 宗 综 
556 总 纵 邹 走 奏 搂 租 足 卒 族 
557 祖 诅 阻 组 钻 繁 嘴 醉 最 罪 
558 尊 遵 昨 左 佐 梓 做 作 坐 座 
559 CNNNN 
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0123456789 
560 : 子 开 死 丐 匡 州 丕 吾 丞 
561 融 吞 亚 | 遇 卫 蕊 和 毛 天 区 
562 后 氏 向 鸯 卦 航 罕 装 、 牙 
563 竹 世 此 元 奉 过 冀 让 厌 面 
564 层 原 服 所 层 肛 所 区区 荐 
565 芒 辆 封 南 上 刘 钾 到 吉 判 
566 则 刺 剂 秘 剂 租 副 出 制 蓝 
567 剿 门 周 人 体 仇 伪 任 伦 八 
568 们 低 化 全 丛 你 供 伦 优 位 
569 伺 作 依 佚 伯 

0123456789 
570 ， 佟 伦 促 伽 值 售 倩 任 侃 
571 侏 众 供 信 佼 依 伯 传 伸 俩 
572 体 倡 俱 传 俑 做 伟 倩 借 佛 
573 停 修 保 倭 伸 个 信 倍 偶 债 
574 优 俏 偶 假 像 供 傍 信 俊 人 
575 信和 做 偶像 供 伪 候 和 傍 全 余 
576 余人 匈 粗 禽 余 傈 今 距 赏 诚 
577 荫 凌 勺 铀 多 血 儿 凤 名 二 
578 充 毫 讼 亦 变 帘 嘉 京 赢 褒 
579 赢 ; 王 副 洗 

0123456789 
580 ” 漆 一 和 买 诗 计 证 这 证 
581 诺 讷 话 启 诈 诏 这 论 谋 读 
582 诗 请 该 庭 诉 诠 侈 这 户 
583 谐 诞 训 诚 谎 诱 讽 诊 诡 
584 庶 谏 让 刘 刘 论 诅 谱 谤 话 
585 议 席 说 课 谥 说 谢 谐 认 
586 诱 识 诡 识 门 释 只 了 陡 阱 
587 孤 陆 隆 陂 取 陀 防 阳 了 区 隆 
588 降 限 隐隐 阳 邢 巫 亢 部 部 
589 部 于 邳 抑 最 

0123456789 
590 ” 媒 分 闻 邮 郸 部 郑 邹 社 
591 丁 郧 部 郡 苦 包 郑 邵 邓 于 
592 邯 部 寻 部 阳 赫 设 刍 负 功 
593 铠 动 劾 贺 动 动 剖 与 赫 婴 
594 不 员 册 曾 A 疗 符 琉 爹 亚 
595 化 垫 捅 诸 罕 圩 二 霹 芒 
596 把 塌 块 折 坂 卉 域 寺 坑 拆 
597 抵 坨 志 坦 夫 址 二 吉 增 霸 
598 南 坑 坊 塌 坦 霸 吉 击 亏 过 
599 卦 塘 塌 坤 夫 
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国标 二 级 汉字 表 


0123456789 
600 “ 崩 境 韦 款 塌 塌 二 场 峻 
601 哉 地 进 塘 井 进 世 整 弯 十 
602 区 药 蔷 芋 茂 区 东区 芗 鞭 
603 莞 昔 蒂 蓉 英 苑 莒 艾 芷 芮 
604 葛 甘 其 蕉 药 英 苞 区 某 苦 
605 基 攻 莱 苷 苯 范 鞭 首 意 黄 
606 苘 芋 茶 荟 葛 茹 昔 划 戈 欧 
607 苟 昔 黄 莞 草 此 莒 苘 疝 荣 
608 莲 养 茯 花 荐 茎 蔡 敬 车工 
609 菊 芜 东 华 荣 

0123456789 
610 ”和音 苇 区 欧 苏区 药 菊 萤 
611 昔 万 劳 莪 莓 项 莅 茶 花 革 
612 莱 获 获 莘 莞 芒 欧 薄 黄 其 
613 薪 蕉 昔 蒙 赣 获 裁 芒 格 葛 
614 莅 草 了 戎 葛 区 汪 欧 薄 著 营 
615 莞 荣 萄 菌 蓝 药 甘 稍 训 城 
616 划 攻 黄 蓝 苯 葆 范 芝 苑 荡 
617 普 芒 划 车 玉 葛 区 蓓 某 功 
618 获 遍 劳 兼 菇 菠 琨 蒜 蒜 区 
619 苑 萎 伺 蔬 获 

0123456789 
620 “ 蓝 区 东 蓝 存单 艾 著 昔 
621 裔 痊 著 菜 蓝 共 昔 薇 燕 葬 
622 贰 共和 薄 墓 蒂 若 苏 划 荣 董 
623 蓬 荷 获 药 者 才 弈 而 译 奔 
624 奕 买 瞻 谣 尤 炮 人 炊 坦 在 扫 
625 技 挤 捞 扒 迭 持 括 抄 揭 返 
626 捐 摊 挪 握 捧 摘 捆 折 拘 接 
627 按 搞 损 把 后 拔 撒 擒 接 擅 
628 所 搂 操 捷 舞 据 掺 搓 气 气 
629 操 探 扔 撤 扼 

0123456789 
630 “” 押 撒 的 排挤 措 报 捧 撞 
631 气 援 拒 扩 飞 忒 武 狼 中 叱 
632 吼 且 叮 肋 呈 呼 鸣 哮 号 哎 
633 蚊 叮 呢 吡 吧 员 呢 呀 哑 味 
634 也 哎 险 咯 嘛 吊 听 网 咬 喔 
635 哺 呆 咳 叶 吕 列 焉 晓 哗 吡 晃 
636 员 听 唤 哌 哈 唆 嘛 只 咪 吃 
633 咏 眼 听 喷 味 嘴 吓 喇 呆 噬 
638 听 啼 唑 哪 哮 喷 噶 吐 啉 啦 
639 跨 吻 史 旷 喷 


0123456789 
640 ， 隧 哑 破 啶 哇 咱 喇 吸 唆 
641 哄 喃 哩 唑 噶 喝 别 嗽 咱 喀 
642 瘟 哮 唆 誉 唾 吃 嗪 听 叶 嘟 
643 嘻 吸 噶 喷 唆 叫 嘎 唱 啤 只 
644 咀 噶 嘲 螺 吨 嘻 岁 噶 吓 顺 
645 喊 吧 喘 咏 咬 喀 咯 咀 咏 史 
646 咕 啤 噢 喉 噜 噶 哈 嘴 喉 对 
647 暗 麻 只 吴 有 咀 喷 口 国 因 
648 图 贺 图 因 贺 团 围 圆 帽 快 
649 炭 帮 暑 辆 帼 
0123456789 
650 ” 帷 由 晶 由 屿 同 发 岂 赋 
651 岐 岷 几 凯 香 崔 岚 岂 由 朵 
652 迪 峡 山 食 刚 绸 岂 峰 山峰 
653 几 巍 央 峡 模 巍 则 峭 凡凡 
654 崛 峰 亩 诺 岂 时 骨 赚 凤 同 
655 岂 嵊 岗 博 凡 典 团 峰 详 
656 咎 和 修得 徇 律 后 徕 徒 币 德 


.657 得 微微 衢 乡 了 狐 针 久 铬 


658 狸 狐狸 狗 狸 狼 猴 狩 独 儿 
659 犹 猎 疹 狂 狂 
0123456789 
660 “多 犹 独 狂 狐 狂 猕 猕 针 
661 狂 猥 猜 独 狐 狂 铣 矣 狂 铬 
662 独 获 外 鹏 给 扫 久 全 饭 钝 
663 念 饪 锯 饰 馈 钠 外 履 包 乌 
664 蚀 馈 镁 馆 傲 包 馈 访 庞 皮 
665 让 麻 岸 麻 处 康 库 刻 厂 庆 
666 座席 康 腐 全 人 付 尾 鲍 层 
667 慌 昼 性 怕 八 愉 恰 性 钮 个 
668 休 侠 悍 快 必 包 境 钻 怪 怡 
669 协 居 催 念 怕 
0123456789 
670 “人 恪 怪 悖 悚 惨 悍 蛋 异 


671 忆 民 悖 剧 售 避 钢 饱 悼 慢 “ 


672 司 址 悖 届 做 乙 怀 民情 避 
673 慌 蛋 居 悚 异 秋 由 门 间 阅 
674 头 闵 阅 六 间 间 阁 阅 闵 间 
675 阅 阅 阁 阅 阅 阅 交 阅 六 阅 
676 站 六 并 半 泡 当 汉 涯 沅 沐 
677. 酒 沌 泪 油 汗 汶 沪 汶 沅江 
678 沭 浅 泸 总 泗 泡 淮 光 沃 沪 
679 洋 沱 泓 泥 泾 


0123456789 
680 ” 浊 消 测 淡 油 泗 泗 涤 演 
681 油 涂 涨 淘 兆 浏 游 浔 溯 涉 
682 河 染 酒 泥 涓 沙 浜 浠 淘 浣 
683 清 淇 浙 淞 渎 涿 深 混 洽 光 
684 泳 淖 演 当 测 谈 潭 酒 激 澳 
685 注 涉 洽 济 这 湿 湄 河 洪 演 
686 沽 举 灌 清漆 混 渴 油 潍 省 
687 浴 注 洲 演 满 汉 潇 潍 消 淖 
688 漂 激 满洲 注 洲 注 潮 渐 


689 清 汪 溢 涯 濑 


0123456789 
690 “” 潍 澧 淆 泻 渡 渗 濮 濞 濠 
691 瀑 瀚 次 泳 渝 淡 源 灞 必 完 
692 宕 密 寡 宕 寓 赛 寨 准 家 赛 


”693 赛 蹇 害 记 二 特 迪 韦 赤 诈 


694 迦 运 追 逅 逢 遗 通 术 道光 
695 俊 迷 延 这 未 避 饼 道 遐 邀 
696 坟 遇 记录 遂 述 邂 邀 乏 掀 
697 习 直 杀 偶 瓜 芭 展 屑 屏 展 
698 展 习 缀 弩 强 籽 弱 吏 中 奴 
699 妃 妍 妩 妈 慈 

0123456789 
700 “ 奴 姊 妫 妞 好 刀 姐 嫩 刀 
701 妾 娅 娆 妹 变 六 姘 巡 旭 寻 
702 娲 娴 装 娣 妮 杂 婧 姨 婕 娼 
703 婢 婵 贫 娼 媛 婷 黎 燃 毁 好 
704 媛 娘 妖 芝 妃 姥 嫖 录 媒 婷 
705 巡 妫 辟 赐 娘 媚 孙 儿 孚 抽 
706 草 子 予 孢 明 驯 有 骆 其 轰 
707 验 戏 骅 了 骊 颈 骤 难 验 悟 
708 鸽 警 骗 骗 枝 赐 又 阳 驴 对 
709 纤 纠 丝 纳 

0123456789 
710 ”经 丝 纾 绀 给 红 络 绵 绸 
711 给 缔 纳 绛 绠 峭 弱 绫 绮 绯 
712 绸 绳 强 组 红 绻 绾 缁 绊 风 
713 绳 幼 绩 绢 缘 内 继 绢 绍 续 
714 组 编 编 弱 科 缤 采 绢 绿 缪 
715 缘 绵 综 赠 缉 缝 绢 缓 线 么 
716 位 人 当当 珂 现 玮 珍 玫 于 
717 珂 珑 焉 珠 铂 毛 珈 得 琪 
718 表 向 更 玉 系 靛 下 琪 瑛 琦 
719 珊 琨 亚 玉 斑 


0123456789 
720 “ 琛 惠 瑜 表 H 环 瑙 环 斑 
721 瑾 融 环 瑞 瑰 璇 璋 瑛 璨 刺 
722 璐 壁 融 时 古 所 镍 机构 杞 
723 权 权 柏 枇 未 杏 枫 杭 杆 本 
724 枞 泉 杭 杷 标 素 覆 朽 梯 枢 
725 杆 杭 柳 相 柚 可 枚 板 检 枸 
?726 本 栎 棺 树 档 档 醚 术 极 桢 
727 杭 机 检 桥 柏 桦 术 检 率 
728 类 核 棚 禁 档 梯 析 梓 机 根 
729 材 梦 配 因 樟 

0123456789 
730 “” 椤 极 核 樟 要 棣 气 楼 棋 
731 楠 棱 杯 槛 梅 棉 竭 极 榴 
732 桩 榈 楼 样 检 杠 柚 柑 榴 栅 
733 棒 榭 棉 术 术 赣 槟 榕 桔 柚 


734 模 档 械 榴 档 歼 榭 橄 机 药 、 


735 袁 概 机 检 榴 樟 哥 权 橡 棋 
736 棍 檀 避 术 献 奖 丽 班 殉 珍 
737 列 鸡 至 邳 焉 歼 殖 思 罗 辐 
738 困 芒 织 轶 办 好 轩 加 轼 轻 
739 输 略 轻 伞 加 

0123456789 
740 “” 辍 输 轩 太 圈 击 戈 钱 夏 
741 戟 蜗 截 吉 融 或 威 瓯 氢 颜 
742 诵 晤 辟 支 向 兄 时 吴县 果 
743 居 昕 昌 灵 易 咎 晶 肪 犯 昵 
744 者 奶 哗 晃 受 晕 睛 瞪 曙 险 
745 晓 暖 是 啤 暖 曜 曦 攻 责 拱 
746 骨 贻 扫 雌 凡 巾 岂 责 赎 责 
747 炭 贱 具 毅 现 规 甬 肯 疯 凯 
748 华强 赎 算 特征 特 特 雏 生 
749 篇 物 者 党 天 

0123456789 
750 “” 阁 芍 孝 御 逢 键 纸 能 监 
751 稳 科 蜂 乞 尔 氨 氛 气 氨 侯 
752 所 所 父 轨 笋 计谋 及 爱 忠 
753 出 胀 晓 育 肝 肝 肽 腕 腌 及 
754 着 胸 胱 肛 肝 肪 腥 肿 吐 用 
755 股 有 胸 且 肥 胱 腾腾 脸 肪 
756 胶 腾 腾 胀 豚 肋 乃 甩 腕 腺 
757 且 腌 腓 用 及 腕 妥 且 彤 采 
758 有 卓 胆 脸 胜 有 脑 莹 脏 滕 腔 
759 脑 肛 膀 襄 肪 


国标 二 级 汉字 表 


0123456789 
760 ” 脐 腾 数 走 敌 坎 系 她 
761 电 风 败 疾 周 有 胡 开 换 斐 
762 雷 调 於 族 旋 施 话 旋 旗 许 
763 场 炜 炖 烩 业 糙 灶 炫 偶 
764 料 知 焙 灶 效 糊 煜 烛 颁 
765 煲 迷 炉 起 灼 爆 灶 烤 | 
766 燃料 权 糯 要 屎 春风 喜 记 
767 记 遍 让 诽 # 祀 容 社 祛 社 
768 被 诈 称 只 祠 祯 袍 祺 禅 神 
769 衬 禧 礼 朱 志 

0123456789 
770 “ 允 想 囊 政 年 羔 次 厅 称 
771 败 邦 天 效 构 溃 要 书 系 洗 
772 洲 森 矶 古 码 毒 寿 大 研 研 
773 丰 砚 夸 破 硕 莫 帮 雁 厂 夏 
774 达 硬 磁 碳 开 兰 三 确 确 
775 夏 磺 礁 碚 达 秦 大 碍 克 太 
776 确 碟 太 志 碟 巩 奏 硬 确 
777 碟 磅 侈 党 珊瑚 盱 晤 虐 时 
778 上 孙 上 千 簿 眙 上 畦 紫 罗 眸 睐 
779 险 瞳 皮 瞪 虞 

0123456789 
780 “” 瞧 降 过 昕 嫉 普 睹 上 申 
781 本 若 旺 昔 町 界 菊 政 贩 哈 
782 货 柑 果 星 轩 冒 畦 黑山 
783 截 畔 吕 豆 鳃 音 多 包 包 外 
784 钊 钉 针 钊 多 匀 角 狂 钰 
785 饶 饭 铃 久 锌 针 钛 包 钰 负 
786 钴 钉 饭 锦 钱 钱 钼 乌 钢 钴 
787 久 久 匀 乌 包 钙 铎 错 钳 邹 
788 销 钱 铅 锐 钟 销 锅 锣 铠 铁 
789 钛 狼 镍 狂 欠 

0123456789 
790 “” 包 忽 铮 饮 久 饥 铵 钾 链 
791 铂 氏 镍 锂 锂 外 铁 乌 铬 镜 
792 钢 铜 食 伍 饥 钢 销 错 锛 乌 
793 旬 锟 钢 锦 锐 链 铁 外 钦 错 
794 锯 钾 针 镍 钥 铵 铁 销 铁 锅 
795 锁 锅 狗 欠 饮 铀 镶 贸 镖 狂 
796 旬 银 铺 链 馈 锁 独 狠 镁 饶 
797 人 微 钢 错 蚀 银 锥 镜 饲 镜 镶 
798 锐 鳃 知 键 稚 秋 黎 穆 秋 租 
799 税 释 稼 牺 和 


0123456789 
800 “ 积 生 稿 欠 禾 入 版 蛟 卑 
8501 档 时 陵 施 雨 鸠 芒 罗 灼 艳 
802 榴 移 钢 鸣 黎 酌 区 和 静 何 弯 
803 狼 酌 移 钢 钢 龟 由 的 轴 鸭 
804 热 问 哆 浪 觅 生 跑 鹊 鸡 网 
805 鹊 鹊 角 莹 十 刻 鉴 葛 六 疗 
806 证 姜 疝 疡 辛 将 疾 着 疱 
807 十 疼 阁 症 疯 症 兽 净 这 痢 
808 疗 疗 诽 痫 痿 病 次 丫 痢 迪 
809 痕 疙 阁 痕 瘙 

0123456789 
810 ” 净 关 闻 将 病 疗 疗 瘦 疗 
811 亡 疗 瘤 病 疗 冶 瘦 癖 闻 瘦 
812 阐 冰 寡 穹 密 空 仇 究 窦 罕 
813 窗 客 塞 府 # 祖 宰 主 诊 被 
814 祥 档 窒 客 衫 镑 里 窒 袜 补 
815 褚 宰 神 福 禄 诺 裤 衫 祷 祷 
816 鹤 袜 裙 褪 福 鹤 正 悄 糙 闫 
817 稚 来 籽 趟 丰 葵 未 硝 耦 炎 
818 烘 克 糖 都 了 机 聘 聆 卫 隆 职 
819 警 覃 预 顾 关 

0123456789 
820 ” 颜 颌 颍 妇 颌 里 阁 标 额 
821 颖 显 千 完 卢 虔 电 电 至 了 李 
822 蛇 巡 时 星 遇 昭 易 紧 昨 
823 是 熏 昨 央 是 蚌 遇 遇 昨 虹 
824 蛤 蚂 有 时 绕 是 蜂 果 虹 
825 星 虹 蛟 蜂 昨 司 搬 蝇 晴 
826 蛇 晓 晴 暴 蜥 姑 螺 量 
827 蝎 蜂 昱 星 蚁 巍 娅 早 蝶 师 
828 蝠 蛙 晴 量 蛤 晓 昊 暗 蝙 
8229 疝 螃 获 螨 蟒 

0123456789 
830 ” 蜡 蚌 昨 蝙 旺 螃 整 螨 蜡 


.831 晨星 蜂 几 惫 暗 蛙 秋 时 晤 


832 蠕 虹 蜡 虹 蟾 蝶 旷 获 坦 曙 
833 告 器 效 鲁 系 竺 竿 笈 笃 禾 
834 筑 策 第 纺 筑 管 算 笔 第 箱 
835 竺 箭 符 稍 筑 答 箱 第 和 篷 
836 签 筝 箱 笋 策 和 笛 筱 答 簧 
837 能 敌 答 特 筹 算 第 答 筑 条 
838 和 能 筑 签 答 筹 能 策 第 镀 租 
839 艇 和 篇 散 往 


0123456789 
840 “第 管 符 租 入 箱 奥 异 春 
841 往 泉 量 红 般 航 和 能 部 艇 扔 
842 笨 德 舶 舱 般 稍 舰 航 镜 艇 
843 入 舱 伪 臭 贺 形 奖 怠 产 羟 
844 羧 羯 痰 义 籼 娄 粕 朵 炳 
845 庚 扣 关 粽 检 丰 炸 粳 配 
846 粮 炎 民 暨 界 钥 售 者 暮 前 
847 阐 副 晓 系 蛇 基 繁 哺 可 雪 
848 好 超 超 赵 赵 规 报 赭 葡 政 
849 醒 栈 醒 配 酷 
0123456789 
850 “” 酬 本 酰 酷 酯 配 醒 醒 栈 
851 醋 配 酷 酬 醒 栈 酶 酶 醒 栈 
852 醚 栈 酸 醴 酿 系 嵌 丰 如 赵 
853 感 玫 鸣 路 距 跌 踊 距 中 中 
854 蹊 路 踊 踊 跆 峙 跷 踪 跳 距 
855 跻 跤 跟 路 跨 躁 路 跨 踏 中 
856 蹲 跳 踪 踏 跑 踊 跤 中 中 蹊 
857 跟 蹦 蹊 蹈 中 跷 蹈 跳 加 蹦 
858 旺 践 趴 践 务 狠 有 锁 狐 错 狐 


859 解 角 角 角 将 


0123456789 
860 ” 饼 通 鲜 苔 普 靓 零 雳 雯 
861 侍者 需 徘 才 起 需 签 匈 紫 
862 胡 上 吨 上 昭 圾 起 上 师 齿 超 昌 量 
863 娃 佳 华 售 瞧 锥 中 也 合计 
864 弘 毛 歼 歼 劾 时 镭 钰 芒 钙 
865 鲜 钻 鲈 稣 鱼 当 色 钙 铺 
866 希 镀 匀 卷 印 晤 儿 链 鲜 鳝 
867 尔 鳃 泻 皖 鲫 铺 鳞 鳅 鲜 饱 
868 铝 锣 够 锥 钢 银 鳃 锁 鳞 名 
869 鳅 鲜 鲜 编 钱 

0123456789 
870 ” 鳌 鱼 名 名 鳃 铺 鳃 鳞 鳗 
871 和 警 镜 组 鲜 鳝 鲜 粗 总攻 疾 
872 靳 糙 鞠 式 工 骸 般 贷 仙 
873 做 斯 苔 解 佣 仍 通 傍 镑 全 
874 魅 驮 大 是 的 肖 千 给 夺 发 
875 汐 讲 网 手法 括 恬 咯 影 如 
876 妓 朋 刁 用 僻 度 麻 记 席 麻 
877 应 麻 击 麻 腐 麟 售 山 勋 点 
878 蝎 踊 歧 塌 野 跑 黯 盼 山 古 
879 由 冉 航 和 刷 丢 
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一 、\ 预 备 知识 


1L.1 大 有 可 为 的 新 天 地 

近年 来 ,各 种 各 样 的 游戏 机 如 潮水 般 涌 入 我 国 的 千 万 个 家 庭 , 据 统计 ,国内 单纯 拥有 游戏 机 的 
家 庭 近 三 干 万。 游戏 机 操作 简单 ,游戏 节目 引人入胜 ,不 仅 能 启发 智力 ,锻炼 思维 能 力 、 反 应 能 力 及 
观察 事物 摸索 规律 的 能 力 , 还 能 向 人 传达 诸如 正 必 压 邪 .多 劳 多 得 .勇者 胜 等 社会 崇尚 的 主流 思想 。 
因此 ,游戏 机 越 来 越 受 到 广大 群众 的 喜爱 。 

游戏 宙 在 我 国 发 展 了 十 年 ,使 用 的 各 种 游戏 节目 都 是 日 本 和 美国 的 作品 ,而 我 国 在 编制 游戏 机 
用 的 电子 游戏 程序 方面 几乎 还 是 一 片 空白 。 在 日 本 ,有 大 量 介绍 游戏 程序 的 杂志 和 书籍 , 仅 在 北京 
图 光 馆 就 有 三 种 专门 介绍 游戏 程序 的 日 文 杂志 。 而 时 至 今日 ,国内 只 有 一 本 (家庭 电 脑 与 游戏 机 }》 杂 
志 , 怎 委 能 满足 几 千 万 游戏 迷 ?! 

在 昌 本 ,青少年 是 编制 和 购买 游戏 程序 的 主力 军 ,而 在 我 国 ,还 没有 编制 游戏 的 高 水 平 人 才 ,所 
以 这 项 事业 大 有 可 为 ! 


1.2 FBASIC 简介 

简单 地 说 ,BASIC 的 意思 是 计算 机 初学 者 使 用 的 语言 ,而 FE BASIC 的 意思 是 家 庭 用 BASIC。 
BASIC 是 目前 世界 范围 内 应 用 最 广 ,用 户 最 多 ,最 容易 学 习 的 一 种 计算 机 程序 设计 语言 。 掌 握 了 
它 , 就 不 难 学 习 其 它 的 计算 机 程序 设计 语言 。 

F BASIC 与 其 它 BASIC 的 区 别 在 于 F BASIC 提供 了 多 种 控制 卡通 人 物 和 背景 画面 的 命令 ， 
可 以 很 方便 地 把 卡通 人 物 , 比 媳 玛 丽 身 、 丽 莎 、 小 企鹅 等 , 释 加 在 自己 设计 的 场景 中 ,比如 千里 雪原 ， 
大 森林 ,迷宫 城堡 ,他 们 可 以 有 各 种 作为 ,比如 飞 奔 、 跳 牙 .攀登 等 。 

F BASIC 为 你 带 来 的 是 极 富 挑 战 性 的 全 新 天 地 ! 已 经 有 很 多 青少年 朋友 ,甚至 中 年 朋友 给 我 
寄 来 了 优秀 的 游戏 程序 和 应 用 程序 ,我 们 为 他 们 发 行 了 《程序 集 》 还 有 一 些 程序 还 刊登 在 国内 有 名 
的 杂志 上 。 现 在 是 你 大 显 身手 的 时 候 了 ,让 我 们 一 起 来 推动 中 国 的 电子 游戏 事业 ,做 勇敢 开拓 的 一 
代 人 ! 


1.3 怎样 学 习 本 手册 

由 于 计算 机 语言 对 于 普通 用 户 来 说 比较 陌生 ,有 浓厚 的 神秘 感 ,所 以 本 手册 的 编写 力图 通俗 易 
懂 , 运 合 自学 ,章节 安排 上 遵循 由 浅 入 深 , 寅 学 习 于 娱乐 的 原则 。 

第 一 章 入 门 须知 的 背景 资料 。 

第 二 蓉 介 绍 了 计算 板 .打字 板 和 音乐 板 的 用 法 ,最 适合 学 龄 前 儿童 和 小 学 生 学 习 和 娱乐 。 

党 二 可 足下 BASIC 入 门 ,通过 大 量 的 和 娼 序 例子 和 注解 分 析 , 介 绍 了 FEF BASIC 的 大 多 数 俞 令 和 
概 人 三 记 章 中 ,注重 讲解 每 条 命令 怎么 用 ,而 不 过 多 地 分 析 为 什么 要 这 样 用 ,这 样 可 使 初学 者 避 开 
复 天 所 这 得 罗 专业 概念 ,从 而 提高 学 习 兴 趣 。 

策 中 剖 是 语法 篇 ,把 上 一 章 介绍 的 各 条 命令 分 类 ,并 逐条 剖析 ,进入 F BASIC 的 更 高 境界 ,并 
可 得 斌 兰 经 党 查 询 命令 的 格式 和 功能 之 用 。 

第 五 章 是 应 用 篇 ,介绍 了 《程序 范例 } 中 收录 的 八 个 游戏 程序 。 通 过 对 这 些 程 序 的 细致 分 析 , 可 
世 于 用 泛 者 提 高 游戏 程序 的 设计 能 力 。 

过 与 是 一 个 附录 ,提供 了 各 种 参考 数据 和 图 表 。 


呈 肥 
1 


学 习 F BASIC 的 最 好 方法 是 边 看 书 边 练习 ,只 看 书 不 练习 ,所 学 的 知识 得 不 到 巩固 。 本 手册 始 
终 贯 彻 “ 模 仿 ? 的 思想 ,让 各 种 文化 程序 的 人 通过 模仿 而 达到 学 习 F BASIC 的 目的 。 文 化 水 平 的 不 
同 , 只 不 过 是 理解 的 深度 不 同 ,进步 快慢 不 同 ,编制 出 的 游戏 程序 的 复杂 程度 不 同 轴 了 。 

编制 游戏 程序 的 好 坏 , 取 决 于 读者 在 模仿 基础 上 的 创造 力 ,青少年 通过 编制 优化 程序 ,可 大 大 
丰富 发 展 想象 力 和 思维 能 力 ,最终 促 进 学 业 进 步 。 


二 、 初 学 者 天 地 


2.1 进入 F BASIC 世界 
超级 学 习 卡 采用 全 菜单 提示 ,使 用 户 一 目 了 然 , 你 只 寓 按 照 提 示 按 动 相 应 的 键 , 就 能 进入 下 
BASIC 世界 。 


2.2 片头 提示 
进入 F BASIC 后 会 显示 如 下 : 


F BASIC V5.OC 
YUXING COMPUTER CO， 
4030 BYTES FREE 


OK 
罩 


第 一 行 表示 这 是 5. OC 版 的 F BASIC。 

第 二 行 表示 制作 单位 是 “ 裕 兴 电脑 公司 ”。 

第 三 行 表示 用 户 在 F BASIC 状态 下 有 4030 个 字 节 的 空间 来 存放 程序 。 

OK 表示 一 切 正常 。 

光标 在 OK 下 面 闪烁 不 停 , 等 待 你 输入 指令 或 程序 。 这 时 ,你 可 以 输入 程序 或 是 键入 SYS- 
TEM ,然后 按 回 车 键 进 入 一 个 分 菜单 ,请 参见 2. 6 节 的 介绍 。 


2.3 计算 板 
图 2. 3 是 计算 板 的 示意 图 “CALCUATORBOARD"? 是 计算 板 的 英文 名 字 。 
羽毛 笔 羽 毛 光 标 :表示 数据 输入 的 位 置 。 整个 屏幕 由 8 行 组 成 ,每 行 可 以 打 入 24 个 字符 ,Fl 代 
表 “ 加 ”F2 代表 “ 减 ”F3 代表 “ 乘 ”,F4 代表 “ 除 ”,F5 代表 “ 左 括号 ”F6 代表 “ 右 括 跌 ”FEF7 代 
表 “ 小 数 点 ”,F8 代表 等 号 。F8 旁边 是 墨水 瓶 。 使 用 时 按 下 这 些 相应 的 功能 键 , 就 能 得 到 相应 的 
符号 。 


羽毛 是 光标 , 叫 羽 毛 光 标 ;表示 数据 输入 的 位 置 。 整 个 屏幕 由 8 行 组 成 ,每 行 可 以 打 入 24 个 字 
符 。 
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括 弧 ”,[F7] 代 表 “ 小 数 点 ”",[F8] 代 表 等 号 。[F8 人 使 用 时 按 下 功能 键 , 便 得 到 相应 
的 符号 。 
图 2.4 是 计算 板 用 法 示意 。 


[CALcurATOR BoA RD ] 


图 2.3 计算 板 示 意 


全 计算 板 运算 规则 
(1) 算 式 


加 减 乘除 四 则 运算 。 
括 弧 最 多 可 用 10 次 。 


(2 有 效 数 字 


8 位 ,8 位 之 后 的 数字 自动 省 略 。 


士 (99999999 一 0. 0000001) 


(3) 计 算 优先 顺序 


先 括 弧 再 乘除 后 加 减 。 


全 计算 板 使 用 方法 
图 2. 4 中 已 经 写 入 了 各 种 数字 ,下 面 对 应 图 2. 4 介绍 计算 器 板 的 用 法 。 
(1) 表 示 一 行内 可 做 多 道 习题 。 
(2 表示 算式 的 长 度 允 许 超过 一 行 
(3) 表 示 负 数 可 以 用 括 弧 括 起 来 。 
(4) 表 示 算 式 前 后 至 少 有 一 个 空格 。 


5) 表示 也 可 输入 字符 ,但 不 参加 计算 。 


ER 
作 一 二 | 
| [ cALCvLATOR_ XRD 中 

下 -2=i 2x3=6 6+2n8 = -( 1) 


We 54236871+ 43 26 .9.57- 中 
| 二 [ ]> 
1 4 


图 2.4 计算 板 用 法 示意 


(6) 表 示 算 式 中 若 插入 了 空格 ,空格 前 的 内 容 不 参加 计算 。 
(7) 如 果 运 算 结 果 在 第 8 行 显示 不 下 ,将 显示 在 第 9 行 。 
全 下 述 用 法 不 能 成 立 


(1) 


(2) 
(3) 
〈4) 
(5) 
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130YUANX2=WRONG 


4 一 WRONG 

10 十 3 一 WRONG 
20000X300000 王 OVERFLOW 
ABC 


;未 定义 的 符号 或 字符 不 能 在 算式 中 使 用 
WRONG 表示 出 错 。 
;不 构成 算式 。 
;等 号 前 插入 了 空格 。 
;计算 结果 超过 8 位 。OVERFLOW 表示 结果 超 长 。 
; 当 上 一 行 最 后 一 个 字符 是 字母 ,下 行 计 算出 错 。 这 


1 十 2 王 WRONG 时 可 删 去 C ,造成 一 个 空格 即 可 。 
全 算式 的 修改 方法 
(1) 用 回 车 键 可 把 羽毛 光标 移动 到 下 一 行 最 左边 位 置 , 即 换行 。 
(2) 用 [jy] 户 ][ 二 | 方向 键 可 以 移动 羽毛 光标 。 
(3) 用 清除 键 [DEL ] 和 插入 键 [ INS | 可 以 删 去 或 增加 算式 中 的 符号 。 
(4) 一 修改 算式 ,等 号 就 自动 删 去 ,要 计算 时 要 再 按 [F8]。 
(5) 如 果 新 的 结果 会 三 在 后 面 的 算式 上 ,这 时 被 至 的 算式 部 分 将 被 删 去 。 
(6) 按 [HOME ] 键 ,屏幕 将 被 清除 。 
全 退出 计算 器 板 的 方法 
(1) 按 [ ESC | 键 ,可 以 退出 计算 板 。 
2.4 打字 板 
图 2. 5 是 打字 板 的 示意 图 ,“MESSBOARD? 是 打字 板 的 英文 名 字 。 打 字 板 的 大 小 为 17 行 ,一 
行 24 个 字符 (24X17)。 利 用 打字 板 可 以 写 文章 、 作 图 .打字 等 等 。 
全 利用 打字 板 练习 打字 。 由 于 键盘 上 英文 字母 排列 和 普通 打字 机 相同 ， 贞 而 可 以 用 来 练习 打字 


8 于 
1 一 | 
MESSAGE “BOARD 
| 
| 


上 


图 2.5 打字 板 示意 
全 修改 方法 
(1) 用 回 车 键 右 把 羽毛 光标 移 到 下 一 行 最 左边 位 置 。 
(2) 用 [jy] 户 ][ 王 |] 键 来 移动 羽毛 光标 到 所 需 修改 的 位 置 。 
(3) 用 [DEL ] 或 L INS ] 键 可 以 删除 或 增加 字符 。 
(4) 按 下 [HOME ] 键 可 以 清 屏幕 。 
全 退出 打字 板 的 方法 
(1) 按 [LESC ] 键 可 退出 打字 板 。 


2.5 音乐 板 

图 2. 6 是 音乐 板 的 示意 图 “MUSICBOARD" 是 音乐 板 的 英文 名 字 。 音 乐 板 有 四 大 行 ,每 一 大 
行 三 小 行 ,三 小 行 对 应 地 被 称 为 上 部 ,中 部 .下 部 。 每 一 行 可 写 入 24 个 字符 。 在 板 的 下 方 有 些 提 示 ， 
含义 为 : 
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一 一 一 一 -一 一 一 一 一 一 一 


[ON 


上 | 
| FAST< 一 日 一 -5SLow | 
| | Fl-F7: cdef9 ab F8:，PLAY | 

#: CDEFFGAB 外 :REPEAT 史 \ 


图 2.6 音乐 板 示意 
(1) FAST< 一 一 一 [IJ 一 一 一 >SLOW 
表示 演奏 速度 。 在 演奏 过 程 中 用 方向 键 ||[ 二 |] 可 以 改变 。 绿 色光 标 向 左 移 动 时 演奏 速度 
加 快 ， 向 右 移动 演奏 速度 变 慢 。 
(2) 下 1 一 F7:cdefgab 
按 [Fl1] 一 [FE7] 功 能 键 , 对 应 于 cd……b。 
cde…b 对 应 于 “多 来 号 … 都 ?。 
(3) 〈 提 ) :CDEFGAB 
CD…B 对 应 于 “多 来 … 都 >。 但 比 用 小 写 的 cd…b 分 别 低 半 个 音 。 
(4) F8:PLAY 
按 [F8] 开 始 演奏 ,羽毛 光标 被 插入 墨水 瓶 中 。 
(5) $ :REPEAT 
在 乐谱 中 播 入 $ ”, 可 以 不 停 地 重复 演奏 。 
全 音乐 板 的 使 用 方法 说 明 
(1) 上 部 .中 部 .下 部 均 可 输入 音符 ,并 可 同时 演奏 出 三 部 合 音 。 三 部 分 别 对 应 的 5 线 谱 如 图 
2.7 所 示 。 


= | | | 
低音 部 ”中 音 部 ， 高 音 部 


图 2.7 
52 


(2) 按 [Fl] 一 [F7] 出 现 cd…b 的 音 , 按 LSHIFT ] 加 [Fl] 一 [F7] 将 出 现 CD…B 的 音 ,图 2.8 
是 两 者 之 间 的 关系 示意 。 按 功能 键 与 直接 从 键盘 上 输入 相应 的 字符 效果 相当 。 


图 2.8 
(3) 在 上 部 输入 数字 1.2.3、.4.5.6.7, 发 高 音域 音 , 在 中 部 输入 数字 1.2、…7 发 中 音域 的 音 ， 
在 下 部 输入 数字 1.2、…?7 可 以 发 出 低音 部 更 低 的 音 。 
(4) 字符 与 数字 一 起 可 以 表现 4 个 8 度 音 。 
(5) 空格 等 未 定义 的 字符 可 以 作为 休止 符 。 
(6) “$ "为 重复 演奏 符 。 
(7) 在 演奏 过 程 中 按 [F8 | 键 , 可 从 头 开始 演奏 。 
(8) 按 空格 键 可 以 终止 演奏 。 
(9) 用 疡 || 二 | 键 改变 演奏 速度 。 
(10) 按 [F8 |] 键 开始 演奏 。 
全 音符 的 修改 方法 
(1) 用 回 车 键 可 以 把 羽毛 光标 移动 一 大 行 。 
(2) 用 方向 键 广 | 下 ]Ly ] 可 以 任意 移动 羽毛 光标 。 
(3) 使 用 DEL |LINS ] 键 可 以 删 去 或 增加 音符 。 
(4) 用 [HOME ] 键 可 以 清除 屏幕 。 
全 退出 音乐 板 的 方法 
(1) 按 [ ESC | 键 可 退出 音乐 板 。 
全 乐谱 示例 


MUSIC BOARD 


MUSIC BOARD 


(1) 


MUSIC BOARD 
C C 


SG ee 


MUSIC BOARD 


(47) 


《3) 


折扣 
二 
品 [| 机 
b0 避 [aa] 
bo0 四 加 
0 机 
0 [ 呈 
乒 吧 1 
名 。 
〇 由 B 一 
他] “ 心 B0 \ 
态 0 码 人 
3 b0 四 
己 忆 
也 
已 
忆 
了 吧 
由 
收 
二 
7 
tb 
AS 


MUSIC BOARD 
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2.6 FF BASIC 初步 知识 
先 按 F5 键 进入 多 功能 菜单 ,再 按 数 字 键 1, 即 可 进入 FBASIC 状态 。 首 先进 入 如 下 “菜单 ”, 读 
者 可 以 通过 选取 站 .| 引 、[ 引 来 “点 菜 >。 选 择 目 进入 FBASC; 选 择 [ 引 进入 BG GRAPHIC 绘图 程序 ; 先 


四 便 退 出 FBASIC。 


F BASIC 
1 一 BABIC 
2 一 BG GRAPHIC 


3 一 END 
1、2、3KEY INI1 


全 进入 FEFBASIC 
按 数 字 1 后 进入 FBASIC。 焉 面 举 一 个 程序 的 例子 ,读者 并 不 需要 搞 懂 它 只 要 会 玩 就 可 以 了 。 
(程序 2. 1》 
5 
10 SPRITE ON \ 
20 CGSET 1,0》 
30 FOR N=0TO 7 》 
40 DEF MOVE(N) 王 SPRITE(0,N 十 1,3,255,0,6) 
50 NEXTY 
60 MOVE 0,1,2,3,4,5,6,7 
RUN 

下 面 解释 一 下 这 个 例子 。 

5、10……60 是 程序 标号 又 称 为 行 号 ,每 个 行 号 之 后 又 有 一 些 指令 和 参数 。 由 指令 和 参数 可 以 
构成 语句 ,上 述 程 序 中 每 一 行 只 有 1 个 语句 。 有 时 指令 和 语句 并 不 能 严格 区 分 开 来 ,比如 :CLS、 
SPRITE ON 本 身 可 叫 指令 ,但 在 程序 当中 又 作为 语句 使 用 。 

每 一 行 后 面 的 y ,代表 按 回 车 键 ,如 果 不 按 回 车 键 ,程序 不 会 换行 .所 以 在 每 一 行 结束 时 必须 按 
回 车 键 。 

RUN 表示 运行 程序 ,一 键入 : 

RUN 
8 个 玛丽 沃 向 8 方 奔跑 。 
用 | _ Pause ] 键 可 以 令 玛 丽 沃 运动 停 下 来 。 不 过 不 会 马上 停 下 来 ,这 里 的 原因 后 面 将 介绍 。 
读者 可 以 键入 下 面 语句 替换 程序 中 的 语句 。 
20 CGSET 1,0 
20 CGSET 1，,2 
每 次 用 一 条 ,后 键入 的 语句 将 取代 程序 中 同行 号 的 语句 。 
改 完 后 用 回 车 键 把 光标 下 移 到 60 行 之 后 ,键入 : 
LIST ;看 程序 是 否 正确 ， 
若 正确 ,键入 ; 
RUN 》 ;可 以 看 出 玛丽 沃 的 颜色 改变 了 。 
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读者 也 可 以 键入 下 面 的 语句 看 看 有 什么 变化 。 
40 DEF MOVE(N) 王 SPRITE(1,N 十 1,3,255,0,0) 
40 DEF MOVE(N)=SPRITE(2,N 十 1,3,255,0,0) Y 
40 DEF MOVE(N)=SPRITE(3,N 十 1,3,255,0,0) Y 
40 DEF MOVE(N)=SPRITE(4,N 十 1,3,255,0,0) 
40 DEF MOVE(N) 王 SPRITE(5,N 十 1,3,255,0,0) 
40 DEF MOVE(N)=SPRITE(6,N 十 1,3,255,0,0) 
40 DEF MOVE(N)=SPRITE(7,N 十 1,3,255,0,0) Y 
40 DEF MOVE(N)=SPRITE(8,N 十 1,3,255,0,0) 
40 DEF MOVE(N)=SPRITE(N,N 十 1,3,255,0,0) 》 
把 DEF SPRITE 的 第 一 个 参数 分 别 用 1 一 8 和 NT 来 代替 。 
运行 修改 过 的 程序 之 后 ,发 现 玛丽 沃 , 丽 落 、 苍 蝇 纷 纷 登场 ,我 们 把 玛丽 沃 、 丽 莎 等 统称 为 卡通 。 
各 种 卡通 图 案 被 印 在 封底 。 利 用 第 40 行 语句 都 可 将 它们 调 出 。 这 个 程序 体现 了 FBASIC 的 特点 ， 
应 该 仔细 体会 。 后 面 将 多 次 介绍 这 个 程序 。 
全 程序 修改 方法 
同 计算 板 ,打字 板 和 音乐 板 。 
全 在 FBASIC 中 ,功能 键 存 入 如 下 指令 ,可 直接 使 用 。 
LOAD(M) PRINT [F3] GOTO 
CHR $ SPRITE CONT(MD) 
_[F7]LISTCM) RUN(CMD) 
全 从 FBASIC 退出 
在 没有 行 号 的 行 中 键入 : . 
SYSTEM 
便 可 以 退回 到 菜单 。 注 意 , 这 时 的 英文 必须 是 大 写 的 。 
从 菜单 中 退出 ,只 能 用 数字 键 [3| ,而 不 能 用 [ESC ] 键 。 
全 进入 BG GRAPHIC 绘图 程序 
在 菜单 中 选 数 字 [ 四 ,可 以 进入 BG 绘图 程序 。BG 绘图 程序 被 用 于 绘制 背景 。 在 第 3. 10 节 有 详 
细 介 绍 这 里 从 略 。 
全 从 BG GRAPHIC 绘图 程序 中 退出 
按 [LESC | 键 
再 按 [Pause | 键 
便 可 以 退回 到 菜单 。 
从 菜单 中 退出 ,用 数字 [3 。 
经 过 上 述 练 习 , 读 者 可 能 已 经 积累 了 不 少 问题 ,下 面 的 章节 将 一 步 步 解 决 您 的 问题 ,并 逐步 把 
您 带 入 BASIC 天 地 中 。 
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\ 上 BASIC 人 入 门 篇 


3.1 独特 的 显示 方式 
FBASIC 是 一 种 面向 游戏 的 BASIC ,语言 ,显示 方式 便 是 其 特点 之 一 。FBASIC 中 的 显示 画面 
由 4 层 组 成 ,如 图 3. 1 所 示 : 


图 3.1 

第 一 层 称 为 卡通 0 面 . 用 SPRITE 指令 可 以 把 卡通 图 形 调 到 这 个 面 上 来 .SPRITE 指令 需要 有 一 套 
参数 与 之 相配 合 使 用 ,在 后 面 将 陆续 介绍 。 卡 通 面 的 大 小 按 点 计算 ,其 大 小 为 : 横 (X 方向 ) 是 256 
点 ; 纵 (Y 方 向 ) 是 240 点 。 

第 二 层 称 为 背景 面 。BASIC 指令 和 程序 就 被 输入 到 这 一 层 显 示 。 背 景 图 形 ,如 高 山 、 建 筑 物 等 
也 是 建立 在 这 一 层 上 的 。 后 面 将 要 介绍 的 BG 绘图 程序 就 可 把 图 形 送 入 这 一 层 中 .背景 面 的 大 小 按 
字符 计算 , 横 (X 方向 ) 为 28 个 字符 , 纵 (Y 方 向) 为 24 行 。 

第 三 层 称 为 卡通 1 面 。 在 一 些 情况 下 ,卡通 图 形 需要 隐藏 在 背景 之 后 。 这 时 就 要 用 到 SPRITE 
指令 把 卡通 隐藏 起 来 。 这 一 层 的 大 小 同 第 一 层 。 卡 通 0 面 和 1 面 统称 卡 通 面 。 

第 四 层 称 为 底 背 景 面 。 适 合 表示 天 空 和 海 的 效果 。 整 个 面 用 一 种 色 表示 ,最 初 被 设 定 成 黑色 。 
用 指令 可 以 改变 底 背 景 面 的 颜色 。 底 背景 面 的 大 小 为 : 横 (X 方向 ) 是 30 个 字符 ; 纵 (Y 方向 ) 是 30 
行 。 

具备 上 述 知 识 后 有 助 于 理解 下 面 的 例子 。 
3.2 卡通 图 案 . 背 景 图 案 . 色 彩 代码 

封底 图 A 是 卡通 图 案 的 示意 。 这 些 图 案 被 预先 存在 学 习 卡 中 。 在 每 个 图 案 的 四 角 有 4 个 代码 ， 
这 个 代码 与 附录 符号 代码 A 中 的 代码 完全 对 应 。 在 需要 某 个 卡通 图 案 时 ,可 以 用 特定 的 指令 调用 
卡通 图 案 的 代码 , 即 可 调 出 对 应 的 卡通 图 案 。 

为 了 表示 出 动画 效果 ,每 一 个 卡通 又 有 许多 姿势 .比如 ,玛丽 沃 就 有 7 个 姿势 ,而 乌龟 则 只 有 两 
个 姿势 。 

为 了 表示 出 走 步 的 效果 至 少 应 有 两 个 姿势 交替 出 现 , 即 ; 


可 以 看 出 乌龟 只 能 完成 走 ? 这 一 个 动作 。 
一 个 卡通 动作 可 以 由 两 个 或 三 个 卡通 姿势 组 成 , 也 可 以 由 一 个 卡通 姿势 组 成 。 比 如 ， 玛 丽 沃 
跳 " 就 是 由 一 个 姿势 组 成 动作 。 但 是 ,这 时 的 动作 不 会 “ 动 ”。 运行 过 第 二 章程 序 2. 1 的 读者 会 发 现 ， 
向 四 角 运 动 的 玛丽 沃 ,都 只 能 采用 “玛丽 沃 跳 " 这 一 个 姿势 。 换 句 话说 , 当 只 有 一 个 姿势 时 ,卡通 动作 
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和 姿势 便 没有 区 别 。 否 则 ,两 者 是 不 同 的 概念 。 

卡通 .卡通 动作 和 卡通 姿势 是 三 个 很 重要 的 概念 ,三 者 在 概念 上 有 从 属 关 系 ; 

卡通 姿势 从 属于 卡通 动作 ,卡通 动作 又 从 属于 卡通 。 也 就 是 说 卡通 一 词 的 含义 最 广泛 。 

卡通 姿势 一 词 对 应 于 卡通 图 案 或 卡通 图 形 。 

封 3 中 又 有 两 个 图 。 一 个 是 图 形 表 B, 一 个 是 色彩 图 表 。 下 面 分 别 介绍 

图 形 表 B 是 用 于 绘制 背景 图 案 。 左 侧 是 图 形 表 B 的 内 容 , 一 共有 13 组 ,一 组 又 有 8 个 。 利 用 图 
形 表 了 B 中 的 图 形 ,可 以 搭 出 城墙 房子。 图形 表 孔 有 侧 的 机 器 人 、 山 和 星星 、. 树 和 岛 ,也 是 用 图 形 表 也 
中 的 图 形 搭 的 。 

根据 不 同 的 配色 ,图 B 中 每 一 个 图 形 还 有 三 种 颜色 可 以 变化 , 即 每 一 个 图 形 共 有 4 种 配色 。 

每 一 个 图 形 大 小 为 一 个 字符 , 即 8X8 点 阵 (64 个 点 )。 点 阵 的 概念 已 经 比较 好 懂 ,商店 里 的 电 
子 广告 牌 上 的 字 ,都 是 由 点 阵 组 成 的 。 

关于 图 B 的 使 用 ,读者 请 参见 3. 10 BG GRAPHIC 绘图 程序 的 使 用 一 节 。 

色彩 图 表 是 为 给 卡通 和 背景 着 色 所 准备 的 。 

FBASIC 为 卡通 面 准备 了 三 种 不 同色 彩 的 屏幕 面板 ,不 同 的 面板 用 不 同 的 代码 , 称 为 板 代码 ， 
用 0,1,2 表示 ,用 后 面 将 要 学 习 的 CGSET 指令 ,可 以 改变 卡通 面板 的 代码 。 当 板 代码 改变 时 ,所 有 
卡通 面 上 内 容 的 颜色 都 将 改变 ,下 面 的 程序 可 以 说 明 这 一 点 。 有 BASIC 经 验 的 读者 可 以 运行 一 下 
看 看 。 没 有 BASIC 经 验 的 读者 可 以 跳 过 而 不 影响 学 习 。 


程序 (3. 1》 

5 CLS ; 清 屏幕 
10 SPRITE ON ;打开 卡通 面 
15 INPUT N 5N 取 0,1,2 
20 CGSET 1,N ; 设 定 板 代码 0,1，,2 
30 DEF SPRITE N,(0,1,0,1,0) 王 CHRS$ (1) 十 CHRS$(O) 十 CHR$(3) 十 CHRS$(2) 

8 ;定义 卡通 姿势 
40 SPRITE N,100 十 115x* N,100 ;把 卡通 在 卡通 面 上 显示 出 来 , * 表示 乘 号 
50 GOTO 15 5 ; 跳 回 15 行 


运行 上 述 程序 可 以 发 现 ,三 个 卡通 (玛丽 沃 ) 的 颜色 被 一 起 改变 。 

同 理 ,FBSAIC 为 背景 面 准备 了 两 种 不 同色 彩 的 屏幕 面板 ,不 同 的 面板 用 不 同 的 代码 ,也 称 为 
板 代码 ,用 0,1 表示 .同样 用 CGSET 人 当 板 代码 改变 时 ,所 有 背景 面 上 内 容 的 颜色 都 将 改 
变 。 

卡通 面 和 背景 面 的 板 代码 ， 都 用 CGSET 指令 指定 。 

无 论 是 用 于 卡通 面 的 板 还 是 用 于 背景 面 的 板 ,每 一 个 板 又 分 成 4 块 , 每 一 块 也 有 一 个 代码 称 为 
配色 代码 。 

卡通 面 的 配色 代码 可 以 用 DEF SPRITE 指令 和 DEF MOVE 指令 指定 。 每 一 次 只 能 根据 指令 
的 规定 改变 卡通 面 上 特定 卡通 的 配色 。 

背景 面 的 配色 代码 用 COLOR 指令 指定 ,COLOR 指令 只 能 改变 背景 面 中 局 部 位 置 的 配色 。 
COLOR 指令 一 次 只 改变 16X16 点 阵 的 配色 。 

配色 代码 指定 的 每 一 块 又 有 二 行 三 列 数字 ,这些 数字 叫做 颜色 代码 ,用 PALET 指令 改变 。 运 
用 PALET 指令 之 后 ,可 以 改变 配色 代码 所 代表 的 配色 。 比 如 ,0 号 配色 代码 的 玛丽 沃 原来 基本 上 
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是 红色 的 ,用 PALET 指令 后 ,可 把 0 号 配色 代码 的 玛丽 沃 变 为 绿色 的 。 
本 节 所 介绍 的 内 容 在 普通 BASIC 中 没有 ,相对 而 言 有 一 定 难度 ,在 读 第 三 章 中 若 有 对 代码 不 
能 理解 的 地 方 也 可 参考 第 四 章 有 关 指 令 的 讲解 。 


3.3， 让 玛丽 沃 运动 的 方法 
在 2.6 节 程 序 2. 1 中 ,读者 已 经 了 解 到 玛丽 沃 可 以 八方 奔跑 。 下 面 介绍 另 一 种 让 玛丽 沃 运动 的 
方法 : 
全 打开 卡通 面 
键入 SPRITE ON ;打开 卡通 面 指令 。 
用 这 个 指令 可 以 打开 卡通 面 。 若 卡通 面 被 关闭 ,就 看 不 见 卡 通 了 。 
与 打开 卡通 面 指令 相对 应 有 关闭 卡通 面 指令 ， 
SPRITE OFF 
用 关闭 卡通 面 指令 ,卡通 面 将 关闭 。 不 要 键入 SPRITE OFF 指令 。 
全 定义 玛丽 沃 的 一 种 姿势 
封底 图 A 中 玛丽 沃 共有 7 种 姿势 ,这 些 姿势 若 要 在 程序 中 使 用 ,一 定 要 经 过 定义 。 定 义 卡通 姿 
势 的 指令 ,还 可 以 定义 卡通 姿势 的 反 转 姿势 ,图 3. 2 便 是 “玛丽 沃 走 1 姿势 的 反 转 。 定 义 卡通 姿势 
的 语句 为 : 
键入 DEF SPRITE 0,(0,1,0,1,0)=CHRS$ (1)+CHRS$(COD) 二 CHR$(3) 二 CHR $ (2) 
图 3. 2 表示 编号 和 卡通 图 形 的 对 应 关系 。CHR$( ) 是 字符 串 指 令 : 
CHRS$(1) 对 应 左上 
CHRS$ (0) 对 应 右上 on 8 
CHR $ (3) 对 应 左下 | 
CHR $ (2) 对 应 右 下 
上 述 语句 中 等 号 的 右边 表示 字符 串 “ 加 ”, 即 玛 
丽 沃 可 由 4 串 字 符 相 加 而 成 。 字 符 串 “加 ”不 同 于 数 
值 相 加 ,比如 ,字符 串 (1)=“ABC”, 字 符 串 (2) 王 
“DEF? 两 串 相 加 的 结果 为 : 
ABCDEF 
为 了 说 明 上 的 方便 ,把 定义 卡通 姿势 的 上 述 语 
名 改写 成， 
DEF SPRITE A,(B,C,D,E,F) 一 ，，。， 


其 中 :A=0 表示 定义 的 是 0 号 卡通 姿势 , 即 姿 
势 代 码 为 0。 3 | 人 
B 王 0 表示 0 号 姿势 采用 0 号 配色 代码 。 图 3.2 
C=1 表示 卡通 图 形 由 16X16 点 阵 组 成 。 
D=0 表示 用 卡通 0 面 。 
E 王 1 表示 卡通 按 封底 图 A 中 给 出 的 图 形 进行 左右 反 转 。 试 比较 图 3. 2 和 封底 图 A 中 
“玛丽 沃 走 1”。 
F 一 0 表示 卡通 与 图 A 给 出 的 图 形 相 同 ,不 发 生 上 下 反 转 。 
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他 改变 玛丽 沃 的 位 置 ; 
右 图 表示 了 屏幕 画面 的 座 标 。(x,y) 表 示 x 方 向 和 y 方 向 的 座 
标 。 下 面 指 令 可 把 玛丽 沃 移 到 座 标 (100,100) 位 置 上 。 


键入 SPRITE 0,100,100 ;0 是 卡通 姿势 代码 ;100 是 座 标 
若 改变 语句 中 的 数据 可 以 改变 卡通 图 形 的 位 置 ,如 ; 
键入 SPRITE 0,150,150 ;执行 这 条 语句 ,卡通 在 比 上 


条 语句 的 位 置 偏 右 下 的 方向 出 现 。 

若 要 修改 语句 ,可 以 利用 方向 键 来 移动 光标 到 需要 修改 的 地 方 , 直 接 键入 数字 或 符号 按 回 车 键 
即 可 。 

全 直接 语句 方式 与 程序 方式 

上 述 几 条 语句 (包括 指令 ) 都 输入 一 条 ,执行 一 条 ,这 种 方式 被 称 为 直接 语句 方式 .但 是 ,对 于 一 
些 情 况 ,一 条 一 条 往 计 算 机 输入 语句 执行 ,未 免 太 不 方便 ,如 果 能 把 一 件 事 : 比 如 可 以 把 3. 3 节 所 采 
用 的 语句 , 按 顺序 记忆 在 计算 机 中 。 做 到 一 次 输入 而 让 计算 机 多 次 执行 和 连续 执行 。 这 种 预先 编 好 
“节目 ”让 计算 机 按 顺 序 连 续 执 行 的 方式 ,就 是 程序 方式 。 


3.4 ”用 程序 让 玛丽 沃 运动 
在 2.6 节 ,曾经 举 过 一 个 程序 的 例子 。 与 3. 3 节 比 较 可 以 发 现 , 前 者 有 标号 后 者 无 标号 。 这 个 
标号 给 出 了 程序 的 顺序 ,可 供 计算 机 识别 和 执行 之 用 .没有 标号 ,计算 机 便 不 知道 该 执行 那 一 句 。 那 
人 么 什么 是 计算 机 程序 呢 ? 简单 地 说 是 按 顺 序 排 列 起 来 的 语句 。 下 面 把 3. 3 节 所 用 的 例子 用 程序 表 
示 出 来 。 在 表示 程序 之 前 , 先 来 做 一 下 准备 工作 。 
信用 CLS 指令 清理 屏幕 
经 述 上 面 输入 指令 ,屏幕 已 经 很 乱 了 ,这 时 可 以 执行 清 屏 指令 ， 
CESA ;YY 表示 按 回 车 键 
用 清 屏 指令 可 使 屏幕 上 的 内 容 被 清 掉 。 这 时 光标 跑 到 左上 角 。 
信用 程序 调 出 玛丽 沃 
下 面 程序 可 调 出 玛丽 沃 。 写 在 分 号 后 面 的 是 注释 。 
10 SPRITE ON Y ;打开 卡通 面 
20 DEF SPRITE. 0,(0,1,0,1,0) 王 ;定义 卡通 姿势 代码 为 0。 
CHR$ (1D) 十 CHRS$(0) 二 CHRS$(3) 二 CHRS$CD) Y 
30， SPRITE 0,120,140Y ;120 是 x 座 标 ,140 是 y 座 标 。 
上 述 程 序 的 写法 与 屏幕 并 不 对 应 ,在 屏幕 上 ,第 20 行 语 句 要 超过 屏幕 一 行 的 长 度 , 这 时 不 要 输 
入 新 的 行 号 而 要 在 屏幕 的 下 一 行 接着 输入 。 
全 标号 
上 述 程序 的 标号 是 以 10 为 增 量 的 ,目的 是 在 语句 中 还 可 以 插入 语句 。 标 号 增 量 最 小 为 1, 但 不 
应 该 重 登 。 若 重 琶 ,后 打 入 的 语句 将 取代 前 面 一 条 同 标号 的 语句 。 标 号 也 被 称 为 行 号 。 
信用 列表 指令 LIST 列 出 程序 清单 
程序 输入 完 并 经 过 各 种 修改 (修改 方法 同 前 ) 后 , 想 看 一 看 程序 是 否 正确 。 可 以 用 列表 指令 ; 
LIST Y 
执行 这 个 指令 ,程序 以 “清单 ”的 形式 被 列 出 。 
信用 执行 指令 RUN 执行 程序 
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上 述 修改 好 的 程序 可 以 用 执行 指令 
RUN Y 
来 执行 ,得 出 程序 运行 的 结果 。 试 与 3. 3 节 的 结果 比较 一 下 ,从 中 可 以 体会 到 程序 方式 的 优点 
吧 ! 
.全 用 清 内 存 指令 NEW 清除 程序 
键入 清 内 存 指令 
NEWY 
程序 将 被 清除 。 用 列表 指令 LIST 再 也 列 不 出 。 所 以 在 使 用 NEW 指令 前 ,一 定 监 铺 认 上 在 的 
所 有 内 容 是 否 都 是 无 用 的 。 
全 CLS 和 NEW 指令 的 区 别 
CLS 不 清除 内 存 的 内 容 , 只 清 屏幕 。 执 行 CLS 之 后 ,用 LIST 仍然 可 以 列 出 存在 内 存 的 程序 。 
而 执行 NEW 则 内 存 内 容 被 清除 ,但 屏幕 不 清除 。 


3.5 ”用 变量 改变 玛丽 沃 的 位 置 
全 变量 
变量 相当 于 可 放置 某 种 东西 的 盒子 ,不 同 的 盒子 有 不 同 的 代号 以 示 区 别 。 变 量 有 不 同 的 代号 
如 ,x,xl,xA,A$,B$ 等 等 。 变量 的 代号 称 为 变量 名 ,而 对 于 不 同 的 BASIC 语言 ,对 变量 名 也 有 不 
同 的 规定 。 变 量 又 分 为 数值 变量 和 字符 变量 。 分 述 如 下 : 
(1) 数值 变量 
数值 变量 需 以 英文 字母 打头 ,长 度 可 达 255 位 ,但 是 只 识别 前 两 位 。 如 ,ABC 和 ABDFE 是 相 
同 的 变量 名 。 
变量 的 内 容 需 用 整数 表示 。 下 面 举 一 个 例子 。 
例 3: 1 
0 站 汪 天 3 同 区 1 帮 | 
又 一 100， 又 A 王 200， X1 一 300 
二 


(2) 字 符 变 量 
字符 变量 也 需 以 英文 字母 打头 ,长 度 可 达 255 位 ,但 计算 机 只 识别 前 两 位 。 在 字符 之 后 加 有 
“$ ?记号 ,用 以 和 数值 变量 相 区 别 。 字 符 变量 的 内 容 要 加 上 引号 ,请 看 下 面 的 例子 。 
例 3. 2， 际 
一 一 -一 总 - 宁 侍 好 
ASV$="MARIO SAMPLE",，XAS$ 三 人 100" 
人 


-FF 
“人 


尽管 100 是 数值 ,但 在 括号 内 作为 字符 变量 的 内 容 , 被 当 作 符号 。 
总 之 ,字符 变量 是 装 符号 的 变量 ,数值 变量 是 装 数值 的 变量 .字符 变量 不 能 比较 大 小 , 正 像 红 色 
和 兰 色 不 能 比较 大 小 一 样 ,但 是 字符 变量 可 以 相 加 。 相 加 的 结果 不 同 于 数字 相 加 。 
另外 ,不 能 用 BASIC 语言 中 的 保留 字 , 如 NEW,RUN 等 作 变量 名 。 
在 程序 3. 1 中 使 用 的 变量 CHR $ (n》, 在 本 书 中 归 入 字符 变量 类 ,并 被 称 为 字符 函数 。 
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全 给 变量 赋值 
例 3. 1 和 例 3. 2 就 是 给 变量 赋值 的 例子 如 ; 
A=100 AS$=“MARIO SAMPLE” 
上 式 的 意义 是 ,把 等 号 右边 的 值 赋 给 等 号 左边 的 变量 。 之 所 以 采用 赋值 的 说 法 ,是 因为 等 号 两 


边 在 形式 上 可 以 不 相等 。 如 : 


A 王 A 十 100 
这 个 式 子 在 BASIC 中 是 合法 的 语句 ,而 且 这 一 语句 还 很 有 用 处 。 在 一 定 条 件 下 可 以 起 到 累加 


器 的 作用 。 


例 3 


10 
20 


对 于 没有 被 赋值 的 变量 ,计算 机 将 自动 赋 给 0 值 。 
等 式 两 边 的 类 型 不 能 错 ,比如 下 面 的 几 个 例子 都 是 错误 的 , 即 在 BASIC 中 被 认为 不 合法 。 


.3; 


A 一 “ABC>” AI 王 “123?” 

B$ 一 123 BI$ 王 ABC 
上 述 式 子 若 输入 到 计算 机 ,将 自动 地 给 出 出 错 信 息 。 
数值 变量 和 字符 变量 取 值 范 围 都 是 有 限制 的 。 
数值 变量 取 整 数 时 的 范围 ; (一 32768 一 十 32767) 
字符 变量 取 值 的 字符 长 度 :(0 一 31) 
这 一 点 与 通常 的 BASIC 不 同 , 希 引起 注意 。 
全 用 变量 改变 玛丽 沃 的 位 置 
程序 3. 2 是 利用 变量 让 玛丽 沃 运动 的 程序 。 

(程序 3. 2》 

5 CLSY ; 清 屏 幕 
SPRITE ON 》 ;打开 卡通 面 
DEF SPRITE 0, (0,1,0,1,0) 一 ;组 成 0 号 卡通 姿势 ,0 号 卡通 是 玛丽 沃 


CHR$ (1) 二 CHRS$(o) 二 CHRS$(3) 十 CHR 
$(2)》 


30 
40 
50 
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INPUT“Y 一 ”YY ;输入 立方 向 的 数值 
INPUT“X 一 ”;XY ;输入 X 方向 的 数值 
SPRITE 0,X,YY ;0 号 卡通 在 X,Y 位 置 上 出 现 
运行 上 述 程序 ， 

键入 RUN 

屏幕 出 现 :Y=? 

键入 数据 :180 

屏幕 出 现 :X=? 

键入 数据 :150 
运行 结果 :玛丽 沃 出 现在 (150,180) 座 标的 位 置 上 。 
不 断 运行 上 述 程 序 , 玛 丽 沃 将 不 断 运 动 。 
全 输入 指令 INPUT 
利用 INPUT 指令 可 以 把 从 键盘 上 键入 的 数字 和 符号 送 入 变量 中 。 基 本 格式 为 ; 

INPUT“ 字 符 ”, 变 量 


引号 中 内 容 可 以 直接 显示 在 屏幕 上 。 紧 跟 在 字符 后 出 现 的 问号 ,是 要 求 键 入 数据 的 标记 。 
3.6 提高 玛丽 沃 运动 效率 的 方法 


全 用 跳 转 指令 GOTO 移动 玛丽 沃 

利用 跳 转 指令 GOTO 可 以 不 断 地 改变 玛丽 沃 的 位 置 。 在 程序 3. 2 中 加 上 一 句 并 运行 之 。 
60 GOTO 30Y ; 跳 转 到 第 30 行 
键入 RUN Y 
屏幕 出 现 :;Y=? ;要 求 输入 数据 
键入 数据 :100Y 
屏幕 出 现 :X=? ;要 求 输入 数据 
键入 数据 :100 Y 

这 时 ,玛丽 沃 在 座 标 (100,100) 位 置 上 出 现 。 同 时 ， 
屏幕 出 现 :Y 一? ;要 求 输入 数据 
键入 数据 :140 
屏幕 出 现 :X=? ;要 求 输入 数据 
键入 数据 :120 

这 时 ,玛丽 沃 出 现在 座 标 (120,140) 位 置 上 ,同时 
屏幕 出 现 :Y 一 ? 


如 果 不 断 键入 不 同 的 数据 ,可 使 玛丽 沃 不 断 移动 。 与 程序 3. 2 相 比 ,改变 位 置 时 不 用 每 次 执行 
RUN 指令 。 
如 果 想 停 下 来 ,可 按 一 下 [| Pause ] 键 。 这 时 


屏幕 出 现 :BREAK IN 30 ;表示 在 第 30 行 被 打 断 运行 
若 还 想 继续 执行 程序 ， 

键入 CONT 

屏幕 再 次 出 现 :Y=? ;要 求 输入 数据 


信用 循环 指令 FOR~NEXT 让 玛丽 沃 运动 

给 程序 3. 2 加 上 两 条 语句 ， 

40 FOR X=1TO 200Y 

60 NEXTY ;第 40 行 和 第 60 行 一 起 构成 X 变量 的 循环 语句 。 


运行 修改 后 的 程序 

键入 RUN Y 

屏幕 出 现 :Y 王 ? ;要 求 输入 数据 
键入 数据 :100 Y 


运行 结果 :玛丽 沃 用 同一 姿势 在 第 100 行 由 左 向 右 移 动 200 次 (200 个 点 )。 
如 果 看 不 清楚 运行 结果 ,请 插入 语句 ， 


55 ”STOP 
运行 后 并 输入 立 值 ,再 按 |F6|, 可 见 玛丽 沃 一 点 一 点 前 进 但 姿势 不 变 。 
修改 第 40 行为 ; 


40 FOR X=0TO 200 STEP 2 
STEP 2 表示 X 每 一 次 变化 2 步 即 :0,2,4,6… 
键入 RUN Y 
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屏幕 显示 :Y 一 ? 
键入 数据 :80 
结果 :玛丽 沃 快 速 向 右 移 动 。 

如 果 让 习 方 向 也 循环 起 来 , 则 要 修改 第 30 行 并 加 上 第 70 行 。 

30 FOR Y=0TO 200 STEP5Y ;STEP 5 表示 一 次 变化 5 步 ,0,5,10… 

70 NEXTY 

第 30 行 和 第 70 行 一 起 构成 Y 循 环 语句 。 注 意 循 环 语句 总 是 成 对 出 现 的 。 

键入 RUN Y 

屏幕 出 现 :玛丽 沃 从 左上 和 角 移 动 到 右 下 角 。 

试 把 第 40 行 的 X 和 第 30 行 的 Y 调换 ,看 一 下 运行 结果 是 什么 ? 

修改 后 的 程序 见 下 面 。 

《程序 3. 3》 

5 CLS 
10 SPRITE ON 
20 DEF SPRITE 0,(0,1,0,1,0)=CHRS$(1) 十 CHR$(O) 二 CHR$(3) 十 CHRS$(2) 
30 FOR Y=0TO 200 STEP 5 
40 FOR X=0 TO 200 
.50 SPRITE 0,X,Y 
60 NEXT 
70 NEXT 

熏 多 重 循环 

循环 语句 是 让 变量 XCY) 循 环 一 次 增加 一 次 值 , 增 加 的 多 少 取 于 步 长 STEPn 的 大 小 ,n 越 大 ， 
一 次 循环 X(CY) 增 加 的 值 就 越 多 。 当 X(CY) 超 过 其 终 值 ,如 上 列 中 的 200 ,循环 就 结束 。 而 循环 变量 
不 一 定局 限于 X 和 YY, 用 其 它 字 母 也 可 以 。 

程序 3. 3 中 由 X,.Y 构成 两 重 循环 。X 在 内 ,Y 在 外 。 当 X 循环 200 次 ,Y 才 循 环 一 次 。 也 就 是 
说 ,多 重 循环 的 次 序 是 先 内 后 外 。 另 外 ,FOR 与 NEXT 总 是 成 对 出 现 , 当 程序 执行 到 NEXT 指令 就 
回去 找 FOR 语句 , 当 循 环 变量 的 值 大 于 所 设 定 的 值 , 比 如 200, 就 从 这 一 循环 中 转 出 。 关 于 循环 语 
句 可 参见 第 四 章 。 
3.7 “用 操纵 器 控制 玛丽 沃 运动 

全 利用 程序 调 出 玛丽 沃 各 种 姿势 

在 封底 上 玛丽 沃 有 7 种 资 势 , 用 下 面 程序 可 以 调 出 3 种 并 得 出 3 个 左右 对 应 的 反 转 图 形 。 

《程序 3. 4》 
5  CLSY 
10 SPRITE ON Y 
15 _CGSET 1,0Y 
20 DEF SPRITE 0,(0,1.0,1,0)=CHRS$ (1) 十 CHR $ (0) 十 CHR(3) 十 CHRS$(C2) 
21 DEF SPRITE 1,(0,1,0,0,0) 王 CHRS$(0) 二 CHRS$(I) 十 CHRS$(2) 十 CHRS$(C3) 
22 DEF SPRITE 2,(0,1,0,1,0) 王 CHRS$ (5) 二 CHR $ (4) 十 CHR$(7) 十 CHRS$ (6) 
23 DEF SPRITE 3,(0,1,0,0,0)=CHRS$(4) 十 CHR$ (5) 十 CHR$() 十 CHRS$(C7) 
24 DEF SPRITE 4,(0,1,0,1,0) 王 CHRS$(21) 二 CHR$ (20) 十 CHR $(23) 十 CHR$(22) 
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25 
30 
40 
50 


60 ， 


70 
80 


DEF SPRITE 5,(0,1,0,0,0) 王 CHR $ (20) 十 CHR $ (21) 十 CHR $ (22) 十 CHR $ (23) 


SPRITE 0,100,100》 
SPRITE 1,150,100Y 
SPRITE 2,100,150 
SPRITE 3,150,150Y 
SPRITE 4,100,50Y 
SPRITE 5,150,50 


键入 RUN 


可 以 得 到 玛丽 沃 的 6 个 不 同 姿势 , 试 与 封底 比较 。 


全 操纵 器 指令 
操纵 器 如 图 3. 3 所 示 。 上 面 有 十 字形 的 方向 键 ,1 号 操纵 器 上 有 选择 键 (SELECT)7 和 起 动 键 
(START)。 在 1 号 和 2 号 操纵 器 上 分 别 有 按钮 A 和 B。 在 2 号 操纵 器 上 还 有 麦克 风 和 麦克 风 音 量 
控制 。 下 面 分 别 介绍 控制 方向 键 指令 STICK 和 控制 其 它 键 的 指令 STRIG 。 


(1)STICK 指令 


STICK 指令 是 FBASIC 的 专用 指令 。 
1 号 操纵 器 对 应 于 :STICK (0) 
2 号 操纵 器 对 应 于 ;STICK(1) 


用 STICK 指令 可 以 测试 操纵 器 十 字形 方向 键 按 下 与 否 .十 字形 方向 键 的 每 一 个 方向 被 按 下 才 
产生 一 个 数值 。STICK 指令 可 以 接收 这 个 数值 。 十 字形 方向 键 如 图 3. 4 所 示 。 


一 孙 
4 


令 S$=STICK(0) 或 S=STICK(1) 

若 按 下 十 字 键 右 侧 ,S=1; 

若 按 下 十 字 键 左 侧 ,S=2; 

若 按 下 十 字 键 下 侧 ,S 一 4; 

若 按 下 十 字 键 上 侧 ,S=8; 

利用 STICK 指令 和 十 字 键 的 配合 ,可 使 卡通 图 
形 上 下 左右 移动 。 

(2)STRIG 指令 
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STRIG 指令 是 FBASIC 专用 指令 。 

] 号 操纵 器 对 应 于 :STRIG (0) 
2 号 操纵 器 对 应 于 :STRIG(1) 

利用 STRIG 指令 可 把 操纵 器 的 4 种 按键 :起 动 . 选 择 .A 和 了 B, 以 不 同 的 数值 传 给 主机 。 令 T= 

STRIG (0) 或 工 =STRIG(1) 若 ， 

若 起 动 键 被 按 下 :T=1 

若 选择 键 被 按 下 :T 王 2 

若 B 钮 被 按 下 :T=-4 

若 A 钮 被 按 下 :T=8 

STRIG 指令 主要 是 控制 主机 起 动 ,选择 游戏 项 目 ,控制 A 钮 和 了 B 钮 在 游戏 中 的 动作 等 等 。 

全 条 件 指令 IF~THEN 

条 件 指令 的 意思 是 ,如 果 … 则 … ,请 看 例句 ， 


40 IF S>2 THEN 100 ;如 果 S>2 则 跳 到 第 100 行 ; 否 则 顺序 执行 。 
50 IF S=2 THEN X=X--1 ;如 果 S=2 则 让 X 一 X 一 1 否则 顺序 执行 。 
由 条 件 指 令 构成 的 语句 ,使 计算 机 具有 判断 功能 。 
全 用 操纵 器 控制 玛丽 沃 运动 


选用 SPRITE OFF 指令 ,使 在 卡通 面 上 的 卡通 图 形 消 失 。 
利用 程序 3.4, 增 加 下 述 语句 : 


26 X=100》 ;让 变量 S 为 1 号 操纵 器 变量 。 

30 S=STICK(0O) ; 若 S>2 跳 转 到 100 ,说 明 上 下 方向 移动 无 
40 IF S>2 THEN 100Y 效 。 

50 IF S=2 THEN X=X 一 1 ”和 著 S=2 则 让 玛丽 沃 向 左 一步 。 

60 IF S=1THENX=X+1Y ; 若 S 王 1 则 让 玛丽 沃 向 右 一 步 。 

70 IF X>250 THEN X=X 一 240 ; 若 X 之 250 则 让 玛丽 沃 回 到 左边 起 始 位 
80 IF X<5 THEN X 王 X 十 245 置 。 

90 SPRITE 0,X,150Y ; 若 X<5 则 让 玛丽 沃 从 右边 出 现 。 

100 GOTO 30 ;只 让 0 号 卡通 (玛丽 沃 一 种 姿势 ) 运 动 。 
键入 RUNY ; 跳 转 到 30 ,等 待 接受 榨 键 。 

;让 变量 X= 100。 


玛丽 沃 的 移动 将 受 1 号 操纵 器 控制 。 

第 21 一 第 25 行 的 程序 ,在 本 程序 中 并 未 实际 使 用 , 删 去 后 仍 不 影响 程序 的 运行 。 

全 让 卡通 图 形 消 失 的 另 一 种 方法 

利用 SPRITE OFF 可 使 卡通 消失 。 如 果 只 让 一 个 或 几 个 卡通 消失 ,SPRITE OFEF 指令 将 无 能 
为 力 。 这 时 可 用 ， 

6 SPRITE1:SPRITE2:SPRITE3:SPRITE4;:SPRITE5 

把 这 条 语句 插入 程序 3.4, 并 加 上 上 述 从 26 一 100 行程 序 , 即 使 不 用 SPRITE OFKF 指令 也 可 让 
1 一 5 号 卡通 消失 。 

SPRITEn 实际 上 是 让 n 号 卡通 消失 的 指令 。 

全 冒号 的 作用 
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在 上 述 第 6 行 语句 中 采用 了 冒号 ,采用 冒号 可 以 在 同一 行 号 下 打 入 多 条 语句 。 但 是 ,一 个 行 号 
下 (包括 冒号 在 内 ), 所 能 键入 的 字符 数 不 能 超过 256 个 。 

全 用 操纵 器 控制 玛丽 沃 动 作 

下 面 的 程序 可 以 使 玛丽 沃 左右 行走 。 在 输入 程序 之 前 ,用 LIST 指令 进行 列表 ,看 内 存 中 还 有 
没有 程序 , 若 有 程序 需要 删除 ,可 用 NEW 指令。 要 清除 画面 的 话 , 可 以 用 CLS 指令 。 程序 3. 5 所 表 
示 的 是 让 玛丽 沃 变换 走 步 姿 势 左右 行走 的 程序 。 注释 写 在 程序 的 右边 。 由 于 程序 较 大 ,这 里 分 析 一 
下 程序 的 执行 过 程 。 

当 键入 RUN 之 后 ,玛丽 沃 用 1 号 动作 出 现在 座 标 (120,140) 位 置 上 ,这 便 是 第 50 行 语 句 的 功 
能 。 当 无 键 按 下 时 ,玛丽 沃 将 会 停 在 那里 不 动 。 因为 根据 顺序 执行 原则 ,计算 机 执行 完 第 50 行 后 便 
执行 第 60 行 。 在 第 60 行 有 两 条 语句 ,一 条 是 赋值 语句 S=STICK(0), 另 一 条 是 条 件 语 句 IF S=0 
THEN 60。 当 无 键 按 下 时 S=0, 这 时 根据 条 件 语句 :如 果 S=0 则 跳 回 60 行 。 所 以 无 键 按 下 时 , 程 


序 将 在 第 60 行 循环 执行 第 60 行 的 语句 。 (程序 3. 5》 
5 CLS ; 清 屏 幕 
10 SPRITE ON ;打开 卡通 面 


20 DEF SPRITE0,(0,1,0,1,0) 王 CHRS$(1) 二 CHRS$(0) 十 CHR$(3) 十 CHRS$ (2) 
21 DEF SPRITE1,(0,1,0,0,0) 王 CHR $ (0) 十 CHR$ (1) 十 CHRS$(2) 十 CHRS$ (3) 
22 DEF SPRITE2,(0,1,0,1,0)=CHR$ (5) 十 CHRS$ (4) 十 CHRS$(C7? 十 CHR$ (6) 
23 DEF SPRITE3,(0,1,0,0,0) 王 CHR $ (4) 十 CHRS$ (5) 十 CHRS$ (6) 十 CHR $ (7) 
;20 一 23 表示 四 种 卡通 姿势 (玛丽 沃 ) 


30 READX,Y,A,B,C,D， ;30 一 40 是 读数 据 语 名 

40 DATA 120,140,1,3,0,2 两 者 一 一 对 应 需 配对 出 现 

50 SPRITE A,X,Y ;1 号 姿势 出 现在 (120,140) 位 置 上 

60 S=STICK(0):IF S=0 THEN 60 ; 设 定 1 号 操纵 器 变量 S,S=0 则 跳 回 60 行 
70 IF S>2THEN 60 ;限制 上 、 下 方向 运动 

80 X=X 十 2:IF S=2 THEN X=X 一 4 ;确定 走 步 步 距 ,一 次 2 个 点 

90 IJF S=1THEN 1000 ;向 右 走 则 跳 到 1000 

100 IF S=2 THEN 2000 ;向 左 走 则 跳 到 2000 


1000 PAUSE 5:;SPRITE C,X,Y:SWAP C,D ;2000 一 2020 向 右 走 子 程序 
1010 SPRITE A:SPRITE B:SPRITE C 
1020 GOTO 60 
2000 PAUSE 5:SPRITE A,X,Y:SWAP A,B ;2000 一 2020 向 左 走 子 程序 
2010 SPRITE A:SPRITE C:SPRITE D 
2020 GOTO 60 

第 70 行 的 作用 是 限制 玛丽 添上 下 运动 。 我 们 知道 上 下 运动 时 的 S 值 将 大 于 2, 而 如 果 S>2 则 
程序 跳 回 60 行 ,这 样 就 限制 了 玛丽 添上 下 运动 。 

控制 向 右 走 的 语句 有 80,90 及 1000 到 1020 行 。 下 面 分 析 向 右 走 的 过 程 。 在 第 80 行 有 : 

X=X 十 2 

X 的 初始 值 是 120, 即 玛丽 沃 不 动 的 X 方向 的 座 标 ,此 时 80 行为 X 王 120 十 2, 可 向 右 移动 两 个 
点 。 向 右 移动 S=1( 十 字 按 键 右 支 被 按 下 ), 从 而 执行 第 90 行 语句 ,第 90 行 是 条 件 跳 转 语句 , 若 S= 
1 则 跳 转 到 1000 行 。 第 1000 行 到 1020 是 控制 玛丽 沃 右 行 的 程序 。 
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第 1000 行 由 三 个 语句 构成 下 面 分 别 介绍 。 
PAUSE 5 是 一 个 暂停 语句 ,表示 暂停 5 个 单位 时 间 。 
SPRITE C,X,Y 表示 显示 0 号 姿势 在 座 标 (122,140) 位 置 上 。 
SWAP C,D 是 一 个 交换 语句 ,表示 C 和 D 的 数值 互相 交换 。 
C 和 D 是 在 30 和 40 行 语句 被 赋值 :C=0,D=2。 
第 1010 行 是 让 无 关 的 玛丽 沃 姿势 消去 。A 和 了 B 是 控制 向 左 运动 的 ,当然 应 该 消去 。 消 去 C 实 


际 上 是 消去 D 的 值 。C 和 D 代表 了 两 个 玛丽 沃 姿势 , 当 持续 按 十 字 键 右 支 ,C 和 D 将 交替 出 现 ,为 
了 表示 走 步 效 果 , 只 能 去 D 值 。C 和 D 代表 了 两 个 玛丽 沃 姿 势 , 当 持续 按 十 字 键 右 支 ,C 和 D 将 交 
替 出 现 ,为 了 表示 走 步 效 果 , 只 能 留 一 个 玛丽 沃 在 屏幕 上 ,要 将 走 过 的 玛丽 沃 姿 势 消去 ,交换 语句 
SWAP C,D 和 SPRITE C 的 使 用 便 可 完成 这 一 要 求 。 


第 1020 是 跳 转 语句 , 跳 转 到 第 60 行 。 

向 左 行走 的 分 析 方 法 同上 ,有 关 的 语句 有 80、.100、.2000 到 2020 行 。 读 者 可 以 自行 分 析 一 下 。 
全 读数 据 指令 READ~DATA 

在 READ 语句 有 变量 ,在 DATA 语句 有 数据 。 变 量 与 数据 一 一 对 应 ,并 可 放 在 程序 的 任何 地 


方 。 程 序 3. 5 中 第 30 行 至 40 行 的 读数 据 语句 可 以 等 效 如 下 语句 ， 


30 X 一 120:Y=140:A=1:B 一 3:C 一 0:D=2 
全 用 操纵 器 控制 玛丽 沃 器 四 方 行走 
当 理 解 了 程序 3.5 后 下 面 的 程序 便 不 难 理解 。 上 下 方向 活动 的 指令 ,在 100 行 .130 行 和 3000 


到 3020 行 中 处 理 。101 行 到 104 行 是 控制 玛丽 沃 位 置 的 语句 。 


〈 程 序 3. 6) 

5 CLS ; 清 屏幕 
10 SPRITE ON ;打开 卡通 面 
15 CGSET 1,0 ;确定 玛丽 沃 的 颜色 
20 DEF SPRITE 0,(0,1,0,1,0) 王 CHRS$ (1D) 二 CHRS$(C0) 二 CHRS$(3) 十 CHRS$(2) 
21 DEF SPRITE 1,(0,1,0,0,0)=CHR $(0)+CHR $ (1) 二 CHRS$(2) 十 CHR $ (3) 
22 DEF SPRITE 2,(0,1,0,1,0) 王 CHRS$(5) 十 CHR $(4) 十 CIIR $ (7) 十 CHR $ (6》 
23 DEF SPRITE 3,(0,1,0,0,0)=CHRS$(4) 二 CHRSV$(5) 十 CHRS$(C6) 十 CHRS$ (7) 
24 DEF SPRITE 4,(0,1,0,0,0)=CHRS$(20) 二 CHR $ (21) 十 CHR $(22) 十 CHR $ (23) 
25 DEF SPRITE 5,(0,1,0,1,0) 王 CHRS$(21) 二 CHR$(20) 十 CHRS$(23) 十 CHR $(C22) 
26 X=100 ;20 一 25 构成 玛丽 沃 6 种 姿 执 
30 READX,Y,A,B,C,D,E,F ;30 一 40 为 读数 据 
40 DATA 120,140,1,3,0,2,4,5 
50 SPRITE A,X,Y 
60 S=STICK(0):IF STRIG(0)<>0THEN  ，; 若 起 动 键 、. 选 择 键 .A 钮 和 

END 
65 IF S=0THEN 60 ;也 钮 任意 一 个 被 按 下 ,程序 结束 。 
70 IF S>2THEN 100 
80 X=X 十 2:IF S=2 THEN X 王 X 一 4 ;左右 行走 
90 GOTO 101 
100 Y=Y 二 2:IF S=8THEN Y=Y 一 4 ;上 下 行走 
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101 IF X>255 THEN X 王 X 一 252 ;让 玛丽 沃 从 左边 出 来 


102 IF X<3 THEN X 王 X 十 252 ;让 玛丽 沃 从 右边 出 来 
103 TF Y>240THEN Y=Y -一 237 ;让 玛丽 沃 从 上 面 出 来 
104 IF Y<3THEN Y=Y 十 237 ;让 玛丽 沃 从 下 面 出 来 


110 IF S=1THEN 1000 
120 IF S=2THEN 2000 
130 IF S>2THEN 3000 
1000 PAUSE 5:SPRITE C,X,Y:SWAPC,D 
1010 SPRITE A:SPRITE B:SPRITE C:SPRITE E:SPRITE F 
1020 GOTO 60 ;1000 一 1020 向 右 行 走 程序 
2000 PAUSE 5:SPRITE A,X,Y:SWAP A,B 
2010 SPRITE A:SPRITE C:SPRITE D:SPRITE E;SPRITE F 
2020 GOTO 60 ;2000- 一 2020 向 左 行走 程序 
3000 PAUSE 5:SPRITE E,X,Y:SWAP E,F 
3010 SPRITE A:SPRITE B:SPRITE C:;SPRITE D:;SPRITE 下 
3020 GOTO 60 ;3000 一 3020 向 上 下 行走 ,但 是 玛丽 沃 只 能 头 朝 上 行 
走 。 
3.8 用 MOVE 系列 指令 控制 玛丽 沃 八方 行走 

在 2. 6 节 程序 2. 1 中 已 经 见 到 玛丽 沃 八方 行走 的 例子 。 这 里 先 介 绍 其 中 用 过 的 两 条 指令 然后 
分 析 该 程序 的 工作 过 程 。 

全 用 DEF MOVE 指令 定义 卡通 动作 及 运动 方式 
DEF MOVE 是 定义 卡通 动作 及 运动 方式 的 指令 ,其 结构 如 下 : 
DEF MOVE(n) 王 SPRITE(A,B,C,D,E,F) 
各 参数 含义 为 
A: 表 示 卡 通 代码 0 一 15,0 号 代表 玛丽 沃 ,1 号 代表 丽 东 ,2 号 代 


B: 表 示 卡 通 运 动 方向 (0 一 8) 其 中 0 代表 静止 ,如 图 3. 5 所 示 。 鹤 汪 司 1 
C: 卡 通 运动 速度 : 
1 代表 最 高 , 即 每 秒 移动 60 个 点 人 
255 代表 最 低 , 即 255 秒 移动 60 个 点 
D :表示 卡 通 运动 的 范围 (1 一 255) 点 
:表示 卡通 出 现在 卡通 0 面 还 是 卡通 1 面 (0 一 1) 
上 :表示 卡通 的 配色 (0 一 3) 
n: 卡 通 动作 代码 (0 一 7), 不 同 的 卡通 其 动作 有 多 有 少 。 如 玛丽 图 3.5 
沃 动作 较 多 ,而 乌龟 的 动作 较 少 。 
DEF MOVE(n) 是 个 功能 很 强 的 指令 , 它 可 以 定义 卡通 的 动作 。 前 面 说 过 ,一 个 动作 可 以 由 几 
个 姿势 组 成 ,用 DEF SPRITE 只 能 定义 卡通 姿势 ,要 让 卡通 有 走 步 动作 ,要 用 一 段 程序 ,而 DEF 
MOVE(n) 所 定 的 就 已 经 是 动作 了 ,根据 不 同 的 运动 方向 ,DEF MOVE(n) 自 动 给 出 应 有 的 动作 ， 
但 是 ,对 于 姿势 较 少 的 卡通 如 乌龟 ,无论 在 那 一 个 方向 上 都 只 能 有 “ 走 ” 这 - 个 动作 。 
全 MOVE 指令 可 使 卡通 开始 运动 
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MOVE 指令 可 使 DEF MOVE 全 庆 下 条 人 下 请 和 人 想 到。 如 ; 
MOVE 0,1,2,3,4,5,6，,7 
这 条 指令 可 使 8 个 方向 的 卡通 同时 开始 运动 。 运 动 的 范围 被 在 DEF MOVE 指令 D 项 中 设 定 。 
MOVE 指令 中 的 代码 (0 一 7 可 以 任 选 设 定 , 如 : 
MOVE 1 ;让 1 号 卡通 运动 
MOVE 0,3,6 ;让 0,3,6 号 卡通 运动 
注意 :MOVE 指令 须 与 DEF MOVE 配合 使 用 ,只 有 当 DEF MOVE 定义 了 8 个 方向 的 卡通 ， 
用 MOVE 指令 才能 从 8 个 方向 中 任 选 一 个 或 几 个 。 读 者 可 以 改变 MOVE 指令 中 参数 和 DEF 
MOVEE 中 了 B 项 参数 比较 一 下 结果 。 


全 玛丽 沃 八方 行走 程序 分 析 
把 程序 2. 1 重 写 如 下 : 
首先 键入 NEW 再 键入 程序 3. 7 
《程序 3.7》 
5 CLSY ; 清 屏 幕 
10 SPRITE ONY ;打开 卡通 面 
20 CGSET 1,01 ;确定 卡通 颜色 
30 FORN=0TO7Y 5 定义 8 个 方向 卡通 动作 。 
40 DEF MOVE (N) 王 SPRITE (0,N 十 ;方向 参数 B 是 可 变 的 
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255,0,0) 
50 NEXTY ;让 8 个 DEF MOVE(n) 同 时 起 动 
60 MOVE 0,1,2,3,4,5,6,7 ;反复 执行 第 60 行 
70 GOTO 60》 
下 面 分 析 程 序 3.7 


30 行 一 50 行 是 定义 卡通 8 个 动作 ,程序 在 30 行 一 50 行 要 循环 8 次 (0 一 7)。 
第 一 次 :N=0 得 DEF MOVE(0)=SPRITE(0,1,3,255,0,0) 
表示 玛丽 沃 0 号 向 上 运动 。 这 里 对 应 MOVE 0。 
第 二 次 :N=1 得 DEF MOVE(1) 王 SPRITE(0,2,3,255,0,0) 
表示 玛丽 沃 1 号 向 右上 运动 。 这 里 对 应 MOVE 1 
第 三 次 :N=2 得 DEF MOVE (2) 王 SPRITE (0,3,3,255,0,0) 
第 四 次 ;……… 


第 八 次 :N=7 得 DEF MOVE(7) 王 SPRITE (0,8,3,255,0,0) 
通过 上 述 8 次 循环 可 以 定义 8 个 玛丽 沃 动作 。 等 式 右边 的 含义 是 
以 1 号 为 例 ; 
和 (1) 王 SPRITE (0,2,3,255,0,0) 
表示 :1 号 ,玛丽 沃 ,向 左上 方 ,以 3 单位 速度 ,可 以 移动 到 255 点 ,并 在 卡通 0 面 上 出 现 ,玛丽 
沃 采用 0 号 配色 代码 。8 次 循环 之 后 程序 进入 第 60 行 。 
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第 60 行 的 MOVE 指令 有 0 一 7 个 参数 分 别 对 应 于 DEF MOVE (0) .DEF MOVE (1)、…, 若 
只 让 DEF MOVE(0) 所 定义 的 卡通 运动 ,用 MOVE 0 即 可 控制 . 若 让 DEF MOVE(1) 所 定义 的 卡 
通 运动 ,用 MOVE 1 控制 。 若 让 8 个 定义 的 卡通 都 动作 ,只 能 用 第 60 行 的 语句 了 。MOVE 指令 实 
际 上 是 控制 DEF MOVE(n) 指 令 的 “开关 ”, 由 MOVE 指令 控制 让 哪 一 个 DEF MOVE(n) 有 效 。 同 
样 , 若 是 没有 让 DEF MOVE(Cn) 定 义 任何 内 容 , 就 是 让 “开关 ?打开 也 得 不 到 任何 东西 。 

第 70 行 的 作用 是 反复 执行 第 60 行 , 即 反 复 起 动 MOVE 指令 ,因为 若 不 反复 起 动 当 DEF 
MOVE(n) 所 定义 的 动作 做 完 后 ,卡通 便 停 下 不 动 了 。 、 

要 想 打 断 上 述 程 序 请 用 [_ Pause ] 键 。 
理解 了 上 述 程 序 下 面 几 个 程序 便 不 难 理解 。 

全 8 种 不 同 卡通 向 8 个 方向 运动 

8 种 不 同 的 卡通 是 玛丽 沃 . 丽 沙 . 苍 蝇 、 飞 鱼 、 企 鹅 , 火 球 . 车 ,太空 站 。 

在 程序 3. 7 中 改写 第 40 行为 : 

40 DEF MOVE (N)=SPRITE(N ,N 十 1,3,255,0,0) Y 
与 程序 3.7 第 40 行 比较 ,只 是 把 SPRITE 中 的 第 一 个 参数 变 成 了 N , 当 循 环 8 次 后 ,可 得 


,一 SPRITE(0.……. ) 
,一 SPRITE(1.……. ) 
.一 SPRITE(2.……. ) 
一 SPRITE(7……. ) 


从 而 使 0 一 7 个 卡通 可 以 出 场 。 
键入 RUN yY ,可 以 看 到 玛丽 沃 、 丽 菏 ,苍蝇 等 向 八方 运动 。 
全 让 八 个 玛丽 沃 直线 前 进 
在 程序 3.7 中 加 入 下 面 程 序 
40 DEF MOVE(N)=SPRITE(0,3,N 十 1,255,0,0) Y 
55 FOR N=0TO 3:POSITION 2x* N 十 1,120,180:NEXT 
70 END ;用 END 指令 表示 程序 结束 ,程序 运行 到 这 一 行将 终 
止 。 
键入 RUN Y ,可 以 看 见 8 个 玛丽 沃 一 起 向 右 走 。 
全 位 置 指 令 POSITION 的 作用 
POSITION 指令 ,决定 开始 运动 的 初始 座 标 。 指 令 格 式 是 ， 
POSITION ny,X,Y 
n :卡通 姿 势 代 码 (0 一 7) 
X: 水 平方 向 座 标 (0 一 255) 
立 :垂直 方向 座 标 (0 一 255) 
理解 了 POSITION 位 置 指令 ,下 面 分 析 上 述 第 40 行 .55 行 和 70 行 的 作用 。 
第 40 行 中 的 变量 是 速度 ,8 个 卡通 动作 的 速度 为 1~8,0 号 动作 的 速度 最 快 ,8 号 动作 最 慢 。 其 
它 参 数 固 定 , 从 而 运动 方向 被 固定 在 右 3 方向 。 
第 55 行 确定 了 4 个 动作 1,3,5,7 在 座 标 (120,180) 位 置 上 开始 起 动 。 另 4 个 动作 在 中 线 上 开 
始 起 动 。 式 2* N 中 "* ,表示 乘 号 。 
第 70 行 是 一 个 结束 行 。 
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全 让 玛丽 沃 停止 
在 让 玛丽 沃 直线 运动 基础 上 再 加 上 以 下 几 句 ,可 使 玛丽 沃 停止 。 


70， PAUSEY 1 ;暂停 ,可 按 任意 一 键 。 
80 CUT .0,1,2,3,4;5,6,7 ;使 0 一 7 号 玛丽 沃 停止 
90 END 
键入 RUN TY 

8 个 玛丽 沃 开始 行走 , 当 按 任意 键 后 8 个 玛丽 沃 停止 。 

若 输入 : 
MOVE 0,2》 ;在 CUT 指令 之 后 指 行 MOVE 指令 


0 号 和 2 号 玛丽 沃 开 始 运动 。 
车 改写 第 80 行 ,键入 : 

80 CUT 0,3》 

键入 RUN Y 

8 个 玛丽 沃 开 始 运动 。 当 按 空格 键 后 ,0 号 和 3 号 被 停止 ,而 其 它 玛丽 沃 照常 行走 。 
全 让 玛丽 沃 消失 
若 在 上 述 程 序 中 采用 下 面 的 语句 可 以 让 玛丽 沃 消失 。 

80 ERA 0,1,2,3,4,5,6,7》 ;改写 第 80 行 ,让 8 个 玛丽 沃 消失 。 

键入 RUN 
8 个 玛丽 沃 开 始 行走 , 按 空格 键 后 8 个 玛丽 沃 都 消失 了 。 
若 输 入 ; 

MOVE 0,1》 5 在 ERA2 指令 之 后 执行 MOVE 指令 
0 号 和 1 号 玛丽 沃 开 始 行走 。 
若 改写 第 80 行 键入 : 

80 ERA3,4》Y 

键入 RUN Y 
8 个 玛丽 沃 开 始 行走 。 当 按 空格 键 后 ,3 号 和 4 号 玛丽 沃 消失 了 。 
全 让 玛丽 沃 跳 
下 面 这 个 程序 可 以 让 玛丽 沃 跳 。 

《程序 3. 8》 

5 _ CLSY 

10 SPRITE ON 

20 CGSET 1,0Y 

30 FOR N=2TO4Y 

40 DEF MOVE (N)=SPRITE(0,N,1,20,0,2) Y 

50 NEXTAY 

60 MOVE 3》 

70 IF MOVE (3) 王 一 1 THEN 70》 

80 ERA3:POSITION 2,XPOS (3),YPOS (3):MOVE 2 》 

90 JIF MOVE (2) 王 一 LTHEN 90Y 

100 ERA 2:POSITION 4,XPOS (2),YPOS (2):MOVE 4》 


110 IF MOVE (4)= 王 一 1 THEN 110 
120 ERA 4:POSITION 3,XPOS (4),YPOS (4) Y 
130 GOTO 60》 
在 分 析 上 述 程序 之 前 , 先 介 绍 MOVE Cn)、XPOS 和 YPOS 的 作用 。 
全 MOVE(n) 指 令 用 于 运动 状态 测试 
基本 格式 :MOVE (Cn)= 一 1 或 0 
n: 表 示 在 DEF MOVE(n) 中 定义 的 卡通 动作 代号 。 
一 1: 表 示 在 DEF MOVE(n) 中 所 定义 的 卡通 仍 在 运动 。 
0: 表 示 在 DEF MOVE(n) 中 所 定义 的 卡通 已 经 运动 到 终止 位 置 。 
以 程序 3. 8 为 例 介 绍 MOVE Cn) 的 作用 。 
在 第 40 行 中 指定 3 号 玛丽 沃 运动 范围 值 是 :20 
在 第 60 行 指定 3 号 玛丽 沃 运动 。 
在 第 70 行 指定 3 号 玛丽 沃 只 要 没有 运动 到 20,MOVE (3) 就 将 等 于 一 1 程序 在 70 行 反复 循 ， 
环 ; 当 MOVE3 运动 到 20 时 ,MOVE(3) 一 0, 程 序 进入 到 80 行 。 
通过 上 述 分 析 可 知 MOVE(n) 是 一 条 很 有 用 的 测试 指令 。 
全 XPOS 和 YPOS 是 自动 定位 指令 
在 DEF MOVE(n) 中 定义 的 卡通 其 运动 位 置 的 确定 可 用 ， 
XPOSCn) 确 定 n 号 卡通 动作 的 尺 方 向 (水 平方 向 ) 的 座 标 。 
YPOSCn) 确 定 n 号 卡通 动作 的 立方 向 的 座 标 。 
以 程序 3. 8 为 例 介绍 XPOS 和 YPOS 的 作用 。 
当 MOVE (3) 王 0 时 程序 进入 到 第 80 行 ; 
80 ERA 3:POSITION 2,XPOS (3),YPOS(3):MOVE 2 
首先 让 3 号 玛丽 沃 消 失 , 让 2 号 玛丽 沃 的 起 始 位 置 为 3 号 玛丽 沃 消失 的 位 置 ,让 2 号 玛丽 沃 运 
动 。 
理解 了 60 行 至 80 行程 序 ,程序 3. 8 便 不 难 理解 .90 行 至 100 行 和 110 行 至 120 行 的 作用 原理 
同 60 行 至 80 行 。 程 序 的 执行 过 程 可 以 用 图 3. 6 表示 


ONE2 MOVE4 
_ MOVE3 


0 人 


图 3.6 整个 跳跃 的 过 程 
给 程序 3. 8 可 以 加 上 音乐 效果 ,如 
65 PLAY 咱 104C1BI1DEG1CDE17 
85 PLAY"03CDE1G1A” 
键入 RUN 》 
将 会 使 玛丽 沃 在 屏幕 中 间 跳 起 ,着 地 ,行走 ,同时 伴 有 音乐 。 
全 用 MOVE 系列 指令 让 玛丽 沃 四 方 移动 
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程序 3. 9 是 让 玛丽 沃 四 方 运动 的 程序 ,该 程序 中 没有 新 的 指令 ,请 读者 自行 分 析 。 
《程序 3. 9》 
5 _CLS 
10 SPRITE ON 
20 CGSET 1,0 
30 FOR N=0TO 7 
40 DEF MOVE (N)=SPRITE (0,N,1,3,0,0) 
50 NEXT 
60 S=STICK (0) 
70 IF S=0THEN N=0:GOTO 120 
80 IF S=1THEN N=3:GOTO 120 
90 IF S=2THEN N=7:GOTO 120 
100 IF S=4THEN N=5:GOTO 120 
110 IF S=8THEN N=1 
120 IF MOVE (M)= 一 1 THEN 120 5 开始 M 王 0, 即 不 赋值 变量 为 0。 
130 IF M=N THEN 160 
140 ERA M:POSITION N,XPOS (M),YPOS (M):M=N 
150 MOVE N:GOTO 60 
160 MOVE M:GOTO 60 
3.9 计算 机 演奏 的 例子 
先 用 NEW 指令 清除 内 存 。 键 入 程序 3. 10。 音 乐 的 名 字 叫 做 :" 美 国 羊 "。 
《程序 3. 10》 
5 CLS 
6 LOCATE 8.12:PRINTZAMERICAN SHEEP" 
10 PLAY"M1Y2V7T3:M1Y1V5T3:M1T37 
20 PLAY"D2A6G3F5G:O2R3FCEDCEC:O1F7C" 
30 PLAY'A5AA7:RFCFRCO1AO2C:FC" 
40 PLAY"G5GG7:RECERCO1GO2C:O02CO1G" 
50 PLAY"A503CC7:RF5AO3C3AG :FC" 
60 PLAY'"O2A6G3F5G :;O2RFRERDRC:FC” 
70 PLAY?AAA7:RFFFRCCC:FC” 
80 PLAY"G5#AA6G3:RERGRERC:O2CO1G"” 
90 PLAY 下 9:FCFAO3F7:F5CF7" 
键入 RUN 
开始 自动 演奏 。 
3.10 BG GRAPHIC 绘图 程序 的 使 用 
BG GRAPHIC 是 一 种 绘图 程序 ,用 于 绘制 背景 。BG 绘图 程序 采用 菜单 结构 ,可 以 通过 方向 键 
0 等 来 挑选 BG 程序 所 提供 的 功能 , 即 " 点 菜 "。 
下 面 开 始 介绍 。 
全 进入 BG 程序 的 方法 
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首先 需 确认 计算 机 是 否 在 FBASIC 程序 设计 状态 ,在 FBASIC 状态 ,请 键入: 
SYSTEM 
这 时 出 现 菜 单 ， 
( 见 下 页 ) 
需要 选取 1,2,3 来 点 菜 。 选 1 是 进入 BASIC , 选 2 是 进入 BG 程序 。 选 3 便 是 结束 。 
全 屏幕 上 各 种 参数 的 含义 
F _ BASIC 


1 一 一 BASIC 
2 一 一 BG GRAPHIC 
3 一 一 END 


1,2,3 KEY IN 山 


当 按 下 数字 键 2 时 ,计算 机 进入 BG 程序 状态 ,在 屏幕 左上 角 出 现 一 个 方块 ; 
图 
这 个 方块 是 光标 。 
在 屏幕 的 下 面 出 现 一 排 符 号 
X:00 MODE 0………… (一 一 设计 图 形 所 使 用 的 一 组 图 形 符号 ) 
Y:00 SELECT “ “一 一 图 形 符号 选择 箭 标 ) 
下 面 分 别 介绍 : 
(1) 座 标 XY 
光标 在 屏幕 上 移动 ,每 个 位 置 均 有 座 标 ,X 表示 横 座 标 ,Y 表示 纵 座 标 。 当 光标 移动 时 XY 
值 随 之 变化 。 
X 变化 的 范围 00 一 27, 即 28 个 字符 ; 
Y 变化 的 范围 00 一 20, 即 21 个 字符 。 
可 以 看 出 ,BG 程序 同 BASIC 程序 均 采 用 字符 座 标 ,而 且 BG 程序 和 BASIC 程序 均 利 用 背景 
面 ,卡通 面 与 背景 面 座 标 之 间 的 关系 如 下 ; 
Xx 一 (X x* 8) 十 16 
y 一 (Y * 8) 十 24 
其 中 x y 是 卡通 面 的 座 标 ,XY 是 背景 面 的 座 标 , * 表示 乘 号 。 在 上 述 范围 内 ,卡通 可 以 重 短 在 
背景 上 。 
(2) MODE 0 
MODE 是 符号 配色 的 指令 ,配色 代码 有 4 种 (0~3) ,配色 表 可 参考 封 3 的 图 表 。 配色 可 在 
16X16 
点 阵 内 进行 ,16X16 点 阵 即 4 个 字符 的 大 小 。 
用 [RETURN ] 键 可 以 改变 图 形 的 颜色 。 
(3) 设计 图 形 所 使 用 的 符号 
设计 图 形 的 符号 一 共有 104 种 ,在 封 3 图 B 中 表示 。 一般 一 次 显示 出 一 组 8 个 ,如 还 要 选 
出 其 它 图 形 , 用 [ PgDn ] 键 .用 [| PgDn ] 键 可 从 上 到 下 选择 13 组 图 形 , 用 | PgUp ] 键 可 以 从 下 到 上 
选择 13 组 图 形 。 
75 


图 形 选 择 箭 标 
箭 标 人 被 指 在 某 一 符号 之 下 , 按 [DEL | 键 , 箭 标 人 向 右 移动 ; 按 [ INS ] 键 , 箭 标 和 人 向 左 移 
。 箭 标 所 指 的 符号 ,是 可 以 被 输入 到 屏幕 上 的 。 
全 用 于 操作 的 指令 
当 按 下 [ ESC | 键 在 屏幕 的 左上 角 出 现 菜单 ; 
SELECT 
COPY 
MOVE 
CLEAR 
FILE 
CHAR 
利用 [个 jy ] 键 来 移 次 箭 标 * 来 选择 上 述 指令 。 当 按 下 空格 键 后 ， 表示 选择 完毕 进入 设计 背景 。 
下 面 分 别 介绍 各 指令 的 作用 。 
(1)SELECT( 选 择 ) 
SELECT 具有 选择 图 形 符号 的 作用 ,在 SELECT 状态 下 还 可 以 完成 配色 等 一 系列 操作 。 


操作 过 程 如 下 。 


' 按 | PgUp | 键 ,或 按 | PgDn ] 键 ,选择 一 组 8 个 图 形 。 
“ 按 [ DEL | 键 和 [ INS ] 键 移动 箭 标 选择 所 需 图 形 。 
. 按 回 车 键 [RETURN | 改变 要 显示 符号 的 颜色 (配色 共有 4 种 )。 


, 按 方向 键 | 个]yj>][ 一 | 键 将 光标 量 移 到 要 显示 图 形 的 位 置 上 。 
. 按 空格 键 ,使 所 选 定 的 符号 显示 在 光标 位 置 上 。 这 时 光标 会 自动 后 移 , 若 要 连续 输入 所 


选 定 的 符号 ,可 连续 按 空 格 键 。 


“ 用 符号 [D ] 键 ,可 以 清除 在 光标 位 置 的 符号 。 
(2) COPY (复制 ) 
COPY 指令 可 把 已 经 选 出 的 符号 复制 到 其 它 指定 位 置 。 操 作 过 程 如 下 ; 
“ 用 [ ESC | 键 进入 指令 菜单 。 
“ 用 [+ 移动 箭 标 人 到 COPY。 
. 按 空 格 键 进入 到 COPY 状态 。 
“ 按 [ 人 [y 全 |[ 二 |] 键 使 光标 移 到 母 位 (要 把 母 位 上 的 图 形 复制 到 它 处 ) 。 
“ 若 按 [ INS | 键 ,符号 便 可 任意 移动 。 
“ 按 [个 jy] 户 ][ 一 ] ,光标 移动 到 子 位 ( 侈 接受 图 形 的 位 置 ) 。 
.位置 决定 后 , 按 [DEL | 键 ,图 形 便 显示 在 光标 位 置 上 。 同样 地 ， 用 [全 和 [PE | 


键 , 可 以 连续 地 复制 图 形 符号 。 


(3) MOVE (移动 ) 
MOVE 指令 具有 把 已 存 的 符号 移动 到 别处 的 功能 。 操 作 过 程 如 下 : 
“ 按 [| ESC | 键 显示 指令 菜单 。 
“ 按 [y ] 键 入 选择 MOVE 指令 。 
“. 按 空 格 键 进 入 到 MOVE 状态 。 


. 按 [个 ]|y][][ 二 | 键 将 光标 移动 到 侈 被 移动 的 符号 上 。 
. 若 按 一 次 [ INS ] 键 ,符号 成 可 自由 移动 状态 。 若 按 两 次 [ INS ] 键 ,符号 便 消 失 。 
“ 按 [不 |y] 人 二] 键 ,符号 可 移动 到 预定 位 置 。 
.位置 决定 后 按 [ DEL | 键 ,符号 可 显示 在 光标 位 置 上 。 
(4) CLEAR( 清 除 ) 
CLEAR 指令 具有 消除 屏幕 上 所 有 图 形 符号 的 功能 。 操 作 过 程 如 下 ， 
. 按 | ESC ] 键 显示 指令 菜单 
. 按 [Y] 键 选择 CLEAR 指令 
. 按 空格 键 , 屏 幕 上 的 内 容 被 清除 。 
. 清除 后 自动 返回 到 选择 状态 。 
(5) FILE( 文 件 ) 
FILE 指令 用 于 保存 和 取出 磁带 上 的 文件 。 操 作 过 程 参见 3. 12 节 。 
(6) CHAR( 符 号 ) 
CHAR 指令 具有 显示 键盘 上 英文 字母 ,符号 和 数字 功能 。 操 作 过 程 如 下 ， 
. 按 [ ESC | 进入 指令 菜单 。 
, 按 [Y ] 键 以 选择 CHAR 指令 
, 按 空格 键 进入 CHAR 指令 状态 ,可 直接 从 键盘 上 把 数字 ,英文 字母. 符号 等 输入 到 光标 
位 置 。 
3.11 BASIC 程序 与 背景 的 连接 
从 3.1 节 至 3. 10 节 , 通 过 举例 已 经 初步 了 解 了 FBASIC 程序 控制 卡通 运动 的 方法 ,也 了 解 了 
用 BG 绘图 程序 绘制 背景 图 形 的 方法 。 当 把 卡通 和 背景 连接 在 一 起 ,就 可 成 为 真正 的 游戏 程序 。 


下 面 便 介 绍 两 者 的 连接 方法 。 
全 程序 与 背景 的 连接 方法 
(1) 用 BG 绘图 程序 绘 出 背景 。 
(2) 按 [ ESC |] 键 , 再 按 | Pause |, 回 到 “菜单 状态 。 选择 1, 进 入 BASIC 状态 。 
(3) 键 入 BASIC 程序 并 加 入 语句 。 ， 
5 _ CLSY ;清除 背景 
键入 RUN Y ; 试 运行 不 带 背景 的 程序 
程序 正确 以 后 ,键入 
5 VIEWY ;联接 背景 
键入 RUN Y ; 带 有 背景 运行 程序 
这 时 背景 和 卡通 可 一 同 显示 出 来 。 
全 几 个 有 关 的 注意 事项 


(1) 当 程序 没有 CLS 语句 ,把 VIEW 语句 用 在 最 前 面 。 
(2) 当 程序 有 CLS 语句 , 则 用 VIEW 语句 代替 CLS 语句 ,以 便 带 背景 运行 。 
(3) 要 修改 BASIC 程序 ,必须 要 先 消 除 背 景 。 
(4) 用 | HOME | 可 以 消除 背景 。 这 时 光标 返回 左上 角 。 
(5) 如 果 程 序 在 运行 中 可 用 | Pause | 键 打 断 。 
全 给 玛丽 沃 八方 行走 如 上 背景 
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利用 上 述 方法 随便 编 一 点 背景 , 按 | ESC | 键 再 按 [ Pause ] 键 退出 BG 绘图 程序 。 按 数 字 1 进入 


BASIC 状态 , 写 出 下 面 程序 ， 


《程序 3. 10》 
5 VIEW 
10 SPRITE ON 
20 CGSET 1,0 
30 FOR N=0TO 7 
40 DEF MOVE (N)=SPRITE (0,N 十 1,3,255,0,0) 
50 NEXT 
60 MOVE 0,1,2,3,4,5,6,7 
70 GOTO 60 
运行 上 述 程序 可 以 发 现 , 刚 才 编 的 背景 和 卡通 一 起 出 现在 屏幕 上 。 而 且 , 卡 通 可 以 重 硬 在 背景 


之 二 :5 
3.12 ”如 何在 磁带 上 存 取 程 序 


用 BASIC 所 写 的 程序 和 用 BG 绘图 程序 所 写 的 背景 ,可 以 用 磁带 存 取 。 

。 存 取 步 骤 有 3 个 ， 

(1) 将 键盘 与 计算 机 相 联 ,并 把 录音 机 电源 和 计算 机 电源 接 好 。 

(2) 将 键盘 读 出 插口 (SAVE 或 WRITE) 与 录音 机 (MIC 或 SAVE) 揪 口 相 联 。 

(3) 将 键盘 读 出 插口 (LOAD 或 READ) 与 录音 机 插口 (EAR 或 LOAD) 相 联 。 

“两 个 注意 事项 ， 

音量 大 小 对 程序 或 背景 的 存 取 有 直接 影响 , 先 放 在 音量 的 中 部 试 一 试 , 一 般 需 要 试 几 次 , 才 可 


把 音量 的 大 小 找 准 。 找 准 之 后 应 记 下 音量 旋钮 的 位 置 ,以 后 每 次 都 在 同一 音量 下 进行 存 取 。 


对 有 高 音 的 录音 机 ,应 把 高 音 开 到 最 大 。 
全 用 文件 方式 存 取 背 景 画面 
文件 ( 文 卷 ) 是 计算 机 专业 的 一 外 术语 ,文件 内 容 由 数据 或 程序 组 成 ,文件 可 以 有 一 个 文件 名 ， 


文件 名 的 有 效 长 度 为 16 个 字符 , 当 有 了 文件 名 ,存在 磁带 上 的 文件 在 调 出 时 ,可 以 用 文件 名 调 出 。 
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“ 用 BG 绘图 程序 存 入 背景 到 磁带 上 

在 3. 10 节 未 介绍 的 FILE( 文 件 ) 功 能 在 这 里 介绍 。 

(1) 把 磁带 插入 录音 机 

(2) 按 | ESC | 进入 指令 菜单 

(3) 按 [yy | 选择 FILE( 文 件 ) 指 令 

(4) 按 空格 键 显 示 出 :SAVE(S),LOAD (L)? ;SAVE 表示 存 入 ,LOAD 表示 调 


(5) 如 果 按 S 则 显示 :FILE NAMEY ;文件 名 ” 
(6) 写 入 文件 名 FILE NAME?7TEST ;文件 名 “TEST 
〈7) 按 下 录音 键 ,再 按 | RETURN | 键 ,开始 存 入 。 
《8) 存 入 完毕 ,计算 机 退出 FILE 状态 ,返回 选择 (SELECT) 状 态 。 
(9) 按 录音 机 | STOP | 键 停 止 录音 。 
整个 存 入 过 程 的 提示 为 : 

SAVE (S),LOAD(L)? S ;选择 S 


FILE NAME “TEST ;文件 名 是 TEST 
WRITING TEST ;正在 写 入 TEST 文件 

.用 BG 绘图 程序 从 磁带 上 读 出 数据 
(1) 在 录音 机 上 插入 磁带 ,磁带 上 存 有 用 BG 程序 编写 的 文件 。 
(2) 找 到 文件 的 开始 部 位 后 停止 ,把 音量 和 音调 调 好 , 当 按 下 录音 机 放 音 键 后 ,在 有 文件 的 地 

方 , 可 以 听 到 比较 尖锐 的 声音 停机 ,再 次 找到 文件 开始 部 位 ,并 留 上 适当 空白 。 按 下 暂停 键 

和 放 音 键 。 
(3) 按 [ ESC | 键 进 入 指令 菜单 
(4)|Y ] 键 选择 FILE( 文 件 ) 指 令 
(5) 按 空格 键 显 示 : 

SAVE(S) ,LOAD(L)? ;选择 存 取 状 态 
(6) 按 世 键 显 示 : 
FILE NAMEY” ;请 输入 文件 名 
如 果 这 时 按 了 S 或 上 之 外 的 键 , 计 算 机 将 返回 选择 状态 。 

(7) 输 入 要 调 出 文件 的 名 字 , 按 回 车 键 , 松 开 录 音 机 暂停 键 。 

如 果 没 有 输入 文件 名 而 按 回 车 键 , 将 取出 磁带 上 遇 到 的 第 一 个 文件 。 

如 果 在 调 出 文件 期 间 按 [ Pause | 键 ,返回 选择 状态 。 
(8) 当 取 完 文件 ,文件 的 内 容 将 被 显示 在 屏幕 上 并 返回 选 直 
(9) 按 录音 机 停止 键 (STOP) 停 止 放 音 。 

当 错 误 地 读 文 件 或 在 读 文 件 时 按 了 | Pause | 键 而 中 断 文件 调 出 ,或 在 屏幕 上 出 现 了 未 完成 

的 图 形 ,这 时 要 用 BG 程序 的 清除 (CLEAR 指令 进行 清除 。 
其 它 错误 参见 后 面 的 介绍 。 
整个 取出 过 程 的 提示 为 ， 


SAVE (S) ,LOAD(L) ;选择 

FILE NAME "TEST ;文件 名 是 TEST 

SKIP ; 跳 过 其 它 程序 

LOADING TEST ;正在 调 出 名 为 TEST 的 文件 


全 存 取 BASIC 程序 
. 存 入 BASIC 程序 
存 入 程序 的 步骤 如 下 : 
(1) 在 录音 机 上 插入 磁带 。 
(2) 作 好 录音 准备 , 按 下 录音 和 暂停 键 。 
(3) 键 入 :SAVE 
(4) 键 入 文件 名 :TEST” 

SAVE"“TEST” ; 存 入 名 为 TEST 的 文件 引号 不 能 少 . 
(5) 释 放 和 暂停 键 
(6) 按 回 车 键 显 示 :WRITING TEST ;正在 写 入 文件 
(7) 存 入 结束 显示 : 

OK 

在 OK 的 下 一 行 显示 光标 : 
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(8) 按 录音 机 停止 键 停止 录音 


整个 存 入 程序 过 程 的 提示 为 ; 
SEVE“TEST?” ; 存 入 名 为 TEST 的 文件 
WRITING TEST ;正在 写 入 文件 
OK ;结束 
;光标 
(9) 要 确认 存 入 是 否 正确 (下 面 将 介绍 )。 


注意 :磁带 的 空白 保护 带 要 预先 卷 过 去 。 
为 了 正确 存 入 BASIC 程序 ,必须 要 确认 是 否 在 BASIC 状态 。 若 在 BG 程序 状态 要 先 退 出 。 
“ 确认 存 入 程序 是 否 正确 的 方法 
《1) 把 磁带 倒 回 到 欲 取出 文件 的 开始 部 分 
(2) 键 入 LOAD? 
《3) 按 回 车 键 , 再 按 录音 机 放 音 键 , 当 磁带 转动 后 屏幕 将 显示 ， 
LOADY? ;问号 不 能 少 
LOADING TEST ;正在 调 出 刚 存 入 的 TEST 文件 
〈4) 取 出 文件 结束 后 ,如 果 程 序 存 入 正确 
屏幕 将 显示 ， 
OK 
如 果 程 序 存 入 不 正确 , 则 屏幕 显示 ; 
LOAD? 
LOADING TEST 
? TP ERROR ;磁带 存 取出 错 
OK 
这 时 请 重新 存 和 一次。 如果 再 次 存 入 后 依然 不 能 正确 调 出 ,请 检查 录音 机 状态 ,或 者 换 一 盘 磁 
带 再 试 一 试 。 
。 从 磁带 取出 程序 
从 磁带 上 取出 程序 与 调 出 程序 检查 是 不 同 的 。 取 出 程序 将 使 内 存 中 原 有 的 程序 破坏 。 下 面 介 
绍 取 出 程序 的 方法 。 
取出 过 程 如 下 ， 
(1) 插 入 存 有 程序 的 磁带 ,找到 磁带 开始 部 位 。 
(2) 键 入 LOAD 指令 和 程序 名 , 即 :LOAD“TEST”" 
(3) 按 回 车 键 , 再 按 录 音 机 放 音 键 , 这 时 屏幕 上 显示 :LOAD“TEST?LOADING TEST 
(4) 如 果 不 键入 文件 名 ,只 用 LOAD 指令 并 按 回 车 键 ,这 时 磁带 上 遇 到 的 第 一 个 程序 被 取 
出 。 
《5) 取 出 程序 结束 后 屏幕 上 显示 : 
LOAD“TEST” 
LOADING TEST 
OK 
如 果 程 序 取 出 有 错 , 屏 幕 上 显示 ; 
LOAD“TEST” 
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LOADING TEST 


? TP ERROR ;磁带 存 取 错误 
OK 
这 时 可 以 再 取 一 下 试 试 ,并 检查 录音 机 联 线 . 音 量 等 是 否 合适 。 
全 出 错 原因 及 处 理 
图 3. 7 是 整个 录音 过 程 的 示意 。 
低音 吁 声 。 滴 音 作 直 高 音 笛 声 和 笛 声 。 低音 十 声 
| 本 
约 10 秒 1 秒 约 10 秒 | 
开 记 录音 存 入 按 程序 名 时 间 长 短 与 存 入 结束 解除 录音 
按 录音 键 回 车 键 程序 量 有 关 


图 3.7 录音 过 程 示意 
无 论 是 BASIC 程序 还 是 BG 程序 的 存 取 , 若 出 现 ， 
? TP ERROR 磁带 存 取 错误 
请 注意 下 列 事项 ,再 进行 存 取 操作 。 
无 法 正确 存 入 程序 (文件 ) 
(1) 键 盘 与 录音 机 联接 错误 
(2) 磁 带 与 录音 机 不 匹配 
(3) 磁 带 上 有 疲 点 
(4) 录 音 机 走 带 不 准 (不 义 ) 
(5) 外 部 杂音 干扰 
〈6) 录 音 机 不 适 于 录入 文件 
处 置 建议 
(1) 正 确 联 线 
(2) 更 换 磁带 
(3) 更 换 录 音 机 
(4) 让 录音 机 远离 电视 机 ,去 掉 录 音 机 上 多 余 的 联 线 。 
无 法 正确 调 出 
在 能 够 正确 存 入 不 能 正确 调 出 时 
(1) 录 音 机 音量 不 适合 ,或 联 线 错误 。 
(2) 有 杂音 进入 。 
(3) 没 有 找到 文件 的 起 始点 。 
处 置 建议 
(1) 调 整 录音 机 的 音量 
《27 确认 元 件 的 起 始点 
(3) 远 离 电 视 避 开 干扰 
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\FBASIC 语法 篇 

4.1 FBASIC 规格 说 明 

在 本 章 将 系统 地 叙述 第 三 章 中 用 过 的 指令 ,以 及 其 它 指令 。FBASIC 对 指令 的 规定 与 MSX 
BASIC 大 致 相同 。 增 加 了 部 分 专用 指令 扩大 了 FBASIC 处 理 游戏 的 能 力 , 压 缩 了 部 分 数值 计算 功 
能 ,使 FBASIC 处 理 数值 的 能 力 比 MSX BASIC 弱 。MSX BASIC 是 日 本 为 家 庭 计 算 机 (8 位 计算 
机 ) 所 制定 的 工业 标准 。 对 于 本 章 指 令 叙 述 不 太 理 解 的 读者 ,也 可 寻找 MSX BASIC 语言 作为 参考 
书 。 例 如 屎 微型 计算 机 BASIC 语言 速 查 手册 》( 中 村 八 束 编 、 杨 孝 如 等 译 , 电 子 工业 出 版 社 ,1987 年 
出 版 ) 该 书 收录 了 MSX BASIC 的 所 有 指令 并 进行 了 解释 ,读者 也 可 把 两 者 进行 比较 。 

下 面 说 明 FBASIC 的 规 : 


字符 种 类 ， 数字 、 英 文 , 符 号 

数字 表示 范围 (整数 ) ， 10 进 制 (一 32768 一 十 32768) 
16 进 制 (&H0000~&HFFFF) 

字符 串 范 围 0~31 个 

变量 名 ， 255 个 字符 ,只 识别 前 两 位 

行 号 范围 0 一 65535 

行 的 最 大 容量 ; 255 位 

多 个 语句 : 一 行内 多 个 语句 用 冒号 隔 开 

编辑 功能 : 全 屏幕 编辑 

画面 状态 : 4 层 

画面 密度 背景 面 (28 字 X24 行 ) 
卡通 面 (256X240 点 ) 
字 :;8X8 点 阵 

彩色 : 用 彩色 发 生 器 产生 52 色 

音乐 功能 : 音符 、 拍 节 、 三 重 和 音 、 音 色 

操纵 器 1 号 、2 号 操纵 器 

通信 : 1200 波 特 

吕 令 数 ， 基本 指令 74 条 

卡通 图 案 设 定 ， 从 已 规定 的 16 种 中 选 

在 介绍 每 个 指令 前 , 先 介绍 一 下 有 关 的 预备 知识 

4.2 运算 符号 

全 运算 符 

运算 符 可 以 分 成 三 类 

〈1) 算 术 运算 符 


其 它 未 规定 的 运算 符 比 如 乘 方 ,是 无 效 的 。 表 4. 1 是 算术 运算 符 的 示意 。 
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表 4.1 算术 运算 符 说明 
示 例 


对 应 的 数学 表达 式 


A 十 B 

人 一 了 相 
AXB 不 
A-B 或 A/B 基本 相同 


取 余 数 的 意思 是 : 
若 10 二 3 王 3, 余 数 为 1。 
用 MOD 表示 为 
10MOD3 ,结果 为 1。 
算术 运算 符 的 运算 优先 顺序 分 为 三 级 : 
@ 乘 、 除 (* 、/) 
@@ 取 余数 (MOD) 
电 加 \ 减 (十 .一 ) 
当 优先 级 相等 ,将 从 左 向 右 执行 表达 式 。 
所 谓 表 达 式 ,是 用 变量 .常数 和 运算 符号 组 成 的 表达 特定 数学 含义 的 式 子 。 在 计算 机 中 还 要 考 
虑 表达 式 是 否 合法 (符合 规则 )。 不 合 规则 的 表达 式 , 计 算 机 将 会 不 识别 。 
为 了 改变 优先 顺序 可 以 采用 小 括 孤 。 


(A 十 B) x* 立 
这 时 先 算 A 十 B ,再 算 乘 Y。 
(2) 关 系 运 算 符 
关系 运算 符 是 用 于 比较 两 个 常数 或 两 个 变量 的 符号 。 
关系 运算 符 有 : 
关系 符 含义 
一 等 于 
< 福 不 等 于 
3 左边 大 于 右边 
二 左边 小 于 右边 
5 左边 大 于 等 于 右边 
二 == 左边 小 于 等 于 右边 


关系 符 在 条 件 语句 IF 一 THEN 中 有 应 用 ,下 面 便 是 一 例 ; 

IF X>0 THEN 1000 
意思 是 X 的 值 若 大 于 0, 则 跳 到 第 1000 行 。 
下 面 是 一 判断 语句 

A 一 X>>0 或 者 A=(X>>0) 
对 于 上 式 : 若 X>0 则 A 被 代入 一 1 

若 X<0 或 X==0 则 让 A=0 
由 A 的 值 可 以 判断 X 是 否 大 于 0。 
(3) 逻 辑 运算 符 
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逻辑 运算 符 用 于 判定 真 伪 逻 辑 关 系 。 当 判定 为 真 时 得 1, 当 判定 这 伪 时 得 0。 逻 辑 运算 的 特点 ， 
决定 了 它 常常 用 于 二 进 制 的 运算 中 。 下 表 是 逻辑 符 及 其 表示 的 含义 。- 


逻辑 符 含义 
NOT 非 
AND 与 
OR 或 
XOR 异 或 


表 4.2 用 X 和 YY 变量 为 例 解 释 了 逻辑 运算 符 的 含义 。 

在 下 ~THEN 语句 中 可 以 用 逻辑 运算 符 来 改变 程序 流程 ; 
IF X>0 AND X<10 THEN 1000 

意思 是 , 当 X>>0 与 X<0 同时 成 立 , 则 跳 到 第 1000 行 。 这 一 语句 等 效 下 面 两 条 语句 ; 
10 IF X 和 0 THEN 30 5 委 0 条 件 成 立 则 跳 转 30 行 
20 IFX<10 THEN 1000 ;X<10 条 件 成 立 则 跳 到 1000 行 


表 4.2 远 辑 运算 符 示例 


轴 辑 符 变 量 逻辑 符 十 变量 解 释 
又 


NOTX 当 双 为 1TNOTX 为 0 
NOT( 非 ) 1 0 当 X 为 0NOTX 为 1 
| 0 1 即 NOT X 和 X 是 相反 的 。 
X 立 XANDY 
和 2。 X AND Y 表示 逻辑 乘 , 当 X 和 YY 为 1， 
和 和 结果 为 1 ,否则 为 0。 
0 1 0 
0 0 0 
X 立 XORY 
下 X OR Y 表示 逻辑 加 ,但 是 1 十 1 不 等 2 
OR( 或 ) 本 1 
时 而 是 等 于 1。 
0 0 0 
人 XXORY 人 
下 X XOR 立 表示 X 和 立 是 相同 值 时 , 结 
人 2 果 为 0, 否 则 为 1。 
0 1 1 
0 0 0 


用 逻辑 运算 符 , 必 须 注 意 逻 辑 关系 是 否 成 立 , 下 面 的 例子 是 错误 的 ， 
IF X<0 AND X>10 THEN 1000 
意思 是 当 X<0 与 之 10 成 立 让 程序 跳 转 到 第 1000 行 
上 面 已 经 介绍 了 三 种 运算 符号 ,下 面 把 运算 符号 的 优先 顺序 归纳 如 下 ， 
(1) 括号 ( ) 
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(2) 函数 
(3) 乘除 * / 
(4) 取 余 MOD 
(5) 加 减 十 、 一 
(6) 等 于 一、 不 等 于 <<> .大 于 > 大 于 等 于 > 一 、 小 于 等 于 < 一 
(7) 非 NOT 
(8) 与 AND 
(9) 或 OR 
(10) 异 或 XOR 
全 字符 变量 的 远 辑 加 (逻辑 与 ) 
字符 变量 相 加 不 同 于 数字 相 加 ,字符 变量 相 加 是 比较 常用 的 。 下 面 的 写法 是 合法 的 。 
C$=A$ 二 By$ 
C$ 一“ 字符 串 ” 十 B$ 
C$=C$ 十 “字符 串 ” 
字符 变量 相 加 是 把 字符 变量 的 值 连 在 一 起 ,下 面 的 程序 可 说 明 这 一 点 。 
10 INPUT Ag 
20 INPUT B$ 
30C 本 ECC" 
40 D$ 王 A$ 二 BS$ 
50 C$=D$T+C$ 
60 PRINT D$,C$ 


RUN 
? AAA ;输入 字符 到 AS$ 
? BBB ;输入 字符 到 B$ 
AAABBB AAABBBCCC ;运行 结果 
全 几 个 具有 特殊 用 途 的 标点 符号 
(1) 一 连接 号 


在 LIST 指令 中 ,可 以 用 连接 号 把 任意 一 段 程序 调 出 来 。 如 : 
LIST 100 一 300》 
(2) ,逗号 
在 输入 语句 INPUT 打印 语句 PRINT 数据 语句 DATA 等 中 ,如 有 多 个 操作 数 时 ,每 个 
操作 数 中 间 用 逗号 隔 开 。 有 时 人 们 把 指令 如 INPUT、DATA 等 称 为 操作 符 ,而 把 这 些 指 
令 所 带 的 参数 ,如 变量 .常数 称 为 操作 数 。 下 面 是 逗号 的 应 用 : 
INPUT A,B,C 
DATA 10,20,30,40 
PRINT A,B 
(3) :冒号 
在 同一 行 号 下 写 入 一 条 以 上 语句 时 ,两 条 语句 之 间 要 用 冒号 隔 开 。 如 ， 
A 王 B 一 C:PRINT A 
(4); 分 号 
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在 INPUT 及 PRINT 语句 中 , 当 多 于 一 个 操作 数 时 ,两 个 操作 数 之 间 可 以 用 分 号 隔 开 。 用 
分 号 隔 开 与 用 逗号 隔 开 不 同 , 用 分 号 隔 开 变量 ,在 打印 语句 中 ,结果 之 间 仅 空 一 格 , 而 用 去 
号 隔 开 则 空 7 格 , 下 面 是 分 号 与 逗号 隔 开 的 例子 : 
10 _ INPUT A,B 
20 PRINT Ai;B ;打印 语句 的 作用 是 把 结果 显示 在 屏幕 上 。 
30 PRINT A,B 
(5)? 问号 
用 问号 代替 PRINT, 以 节约 空间 。 如 : 
? A,B,C 等 于 PRINTA,B,C 
(6)&HX X 表 示 16 进 制 数 ,如 ; 
&H2C 即 10 进 制 44 
全 二 进 制 .十 六 进 制 、. 十 进 制 比较 
关于 二 进 制 .十 六 进 制 的 讲解 书籍 已 经 很 多 ,这 里 仅 举 一 例 加 以 说 明 。 
所 谓 十 进 制 就 是 逢 十 进 一 , 而 二 进 制 呢 ? 是 逢 二 进 一 , 而 十 六 进 制 就 是 估 十 六 进 一 。 二 进 制 和 
十 六 进 制 是 为 了 计算 机 计算 上 的 方便 ,对 于 用 惯 十 进 制 的 人 ,自然 不 太 方便 。 下 面 比 较 一 下 三 种 进 
制 的 特点 ,如 表 4. 3 所 示 。 
十 进 制 数 255 用 十 六 进 制 表示 为 FF; 用 二 进 制 表 示 为 11111111。 
本 章 提供 了 十 六 进 制 和 十 进 制 数 之 间 的 转换 指令 。 
4.3 语法 部 分 的 学 习 方 法 
在 解释 每 一 个 指令 之 前 , 先 介 绍 本 书 描 叙 每 个 指令 的 方法 。 
功 能 :解释 每 个 指令 的 功能 
格 式 : 说 明 指令 构成 语句 的 书写 格式 。 烙 式 中 采用 的 符号 和 字母 遵照 下 述 规定 。 
(1) 英文 大 写字 母 可 直接 键入 ; 
(2) 中 括 孤 〇 内 的 内 容 可 任意 省 略 , 但 中 括 孤 不 要 输入 到 语句 中 ， 
(3) 大 括 弧 {  } 内 的 内 容 可 任 选 一 项 ; 
(4) 括号 .逗号 冒号、 连接 号 等 符号 ,必须 用 在 所 指定 的 位 置 ; 
(5) 省 略 号 …… 表 示 在 一 行 (255 个 字符 内 ) 范 围 内 可 重复 多 次 相同 或 有 规律 的 内 容 ; 
(6) 间隔 符 一 表示 在 两 个 字符 之 间 有 间隔 ; 
(7) 引号 ” “表示 其 中 的 内 容 是 字符 串 ; 
(8) 其 它 有 关 语法 内 容 在 下 面 进 行 叙 述 。 
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表 4.3 三 种 进 制 的 比较 


0 
1 
2 
3 
4 
5 
6 
8 
9 
A . 
了 B 
C 
D 
世 
下 
10 


缩写 :指令 的 缩写 符号 。 缩 写 符号 计算 机 可 以 识别 。 
解 释 :详细 说 明 指令 功能 或 注意 事项 。 
程序 例 :适当 的 例子 或 执行 结果 。 由 于 程序 可 能 在 一 行内 显示 不 下 ,这 时 要 不 改行 号 ,连续 把 一 行程 
. 序 输入 完 。 
缺 省 值 :如 果 没 有 给 指令 指定 参数 , 缺 省 值 作为 参数 将 自动 地 被 处 理 。 
4.4 系统 实用 指令 
CLEAR 
功 能 :设置 用 户 程 序 使 用 的 内 存 范 围 。 
格 式 ;CLEAR &HXx X 
内 存 位 置 通 常用 16 进 制 数 表示 。“&H” 被 用 在 16 进 制 数 前 。 
缩写 :CLE 
解 释 ; 为 了 防止 程序 过 大 进入 系统 控制 程序 区 ,用 CLEAR &HX X 指 令 可 以 预先 设置 程序 的 范 
围 ,以 避免 程序 丢失 。 
， 仅 使 用 CLEAR ,可 以 清除 内 存 所 有 变量 以 得 到 更 多 的 空间 。 


程序 例 ;10 REM x* CLEAR x ;这 是 一 条 注释 语句 ,后 面 将 介绍 。， 
20 CLEAR &H7600 ; 设 定 程序 只 能 在 十 六 进 制 7600 单元 之 前 的 区 域内 。 
NEW 
功能 :清除 内 存 区 中 所 有 程序 和 变量 。 
格 式 :NEW 
缩 写 ， 


解 释 : 执 行 NEW 指令 将 清除 内 存 中 已 有 的 程序 (用 户 自己 输入 的 程序 ) 和 使 用 的 变量 。 
TST 、 
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功能 :把 内 存 中 已 输入 的 程序 按 行 号 大 小 ,在 屏幕 上 列 出 。 即 列 出 程序 清单 。 
格 式 :LIST [m][ 一 [n]] 


m-~>~ 表 示 起 始 行 号 
n 一 表示 结束 行 号 
缩 “ 写 :L， 
解 ” 释 :LIST 指令 的 作用 是 列 程序 清单 。 当 程序 被 在 屏幕 上 列 出 后 ,可 以 较 容易 的 发 现 错误 从 而 
有 利于 修改 。 
利用 LIST 指令 ,可 以 任意 地 列 出 所 想 看 的 程序 。 说 明 如 下 
LIST m ;只 列 出 第 m 行程 序 
LIST m 一 ;只 列 出 从 m 行 到 结束 行 的 程序 
LIST m 一 n ; 列 出 从 m 行 开 始 到 n 行 结束 的 程序 
LIST ; 列 出 所 有 程序 
10 REM x* LIST x 
20 _ INPUT X 
程序 例 ; 30 Y=X 十 Y 入 的 程序 
40 PRINT X;Y 
50 END 
LIST 30 
30 ea 30 行 
OK 
LIST 40 一 
40 PRINT X;Y 机 
ER 列 出 40 行 之 后 的 程序 
OK 
LIST 一 20 
10 REM x LIST x 要 
50 列 出 20 行 之 前 的 程序 
OK 
LIST 
10 REM x* LIST x 
20 _ INPUT X 
30 立 一 X 十 X 列 出 所 有 程序 
40 PRINT X;Y 
50 END 
OK 
RUN 
功能 :运行 内 存 中 的 程序 
格 式 :RUN[m] 
m-~ 表 示 开 始 行 号 
缩 ” 写 :R. 
解释 :(1) 如 果 仅 键入 RUN 指令 ,程序 从 开始 执行 。 
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(2) 如 果 键 入 RUN m, 表 示 从 第 mm 行 开 始 执行 。 利 用 这 种 方法 可 以 检查 程序 某 一 部 分 是 否 
有 错误 。 
(3) 关 于 程序 运行 期 间 的 打 断 和 继续 进行 ,请 参看 对 STOP 指令 和 CONT 指令 的 叙述 。 


10 REM x* RUN x* 

20 PRINT “FAMILY?” 

30 PRINT“BASIC?” 

40 END 

RUN ;运行 程序 

FAMILY 
BASIC | aase 
OK 


入 的 程序 


;STO. 

;在 调试 程序 时 ,STOP 指令 是 很 有 用 的 。 当 程序 执行 到 某 一 段 时 ,插入 一 个 STOP 指令 把 程 
序 中 断 掉 ,看 看 程序 运行 的 中 间 结果 是 否 和 预想 的 一 致 ? 若 没 有 问题 ,再 用 CONT 指令 继 
续 运 行 。 在 键盘 上 有 一 个 | Pause |] 键 ,产生 的 中 断 效果 同 STOP 指令 .。 也 可 用 CONT 指令 
继续 运行 。 


10 REM x STOP x 
20 FOR I=1TO 10 
30 PRINTI 
40 STOP 
50 NEXT 
RUN 
1 ;显示 结果 1 
BREAK IN 40 ;显示 在 第 40 行 中 断 
OK 
CONT ;键入 CONT 
2 ;显示 结果 2 
BREAK IN 40 ;显示 在 第 40 行 中 断 
OK 
CONT 
功 能: 令 被 中 断 的 程序 继续 执行 
格 式 ;CONT 
缩写 :C. 
说 ” 明 :(1) 用 | Pause | 键 或 STOP 指令 产生 的 程序 中 断 , 可 以 用 CONT 指令 继续 程序 的 执行 。 
(2) 在 程序 执行 中 产生 出 错 信 息 而 程序 也 被 中 断 时 ,CONT 指令 可 以 从 出 错 的 下 一 行 继续 
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执行 。 

程序 例 :参见 STOP 一 节 END 

功能 :使 程序 终止 执行 

缩写 :E. 

说 “” 明 :END 指令 也 可 用 于 判断 语句 中 ,而 并 让 程序 终止 。 通 常 END 指令 可 被 用 在 程序 的 最 后 一 
行 。 在 有 子 程序 的 程序 中 END 所 在 的 行 代表 结束 行 。 


程序 例 : 

10 REM x* END x ;执行 这 个 程序 将 依次 打印 出 1,2,3…… 假 如 按 下 Z 
20 FOR I=1TO 1000 ; 键 ,程序 将 结束 。 否 则 ,将 依次 打印 到 1000 

25 PRINT 1; ; 


30， A$ =INKEYS9$ ; 

40 IF Ad$=“Z2?THEN END ; 

50 NEXT ; 

RUN ; 
123456… ;结果 

LOAD 

功 能 :将 磁带 上 的 文件 输入 到 内 存 中 。 

格 式 :LOAD[” 文 件 名 妇 

缩写 :LO 

解 释 :(1) 文 件 名 是 由 SAVE 指令 所 指定 的 文件 名 。 

〈2) 执 行 LOAD 指令 将 清除 内 存 原 有 的 程序 和 变量 


程序 例 : 
LOAD ;取出 磁带 上 的 第 一 个 文件 
LOADING TEST ;文件 名 为 TEST 
OK 
LOAD “TEST 一 2” ;取出 名 为 “TEST 一 2” 的 文件 
SKIP TEST ; 跳 过 名 为 TEST 的 文件 
SKIP TEST 一 1 ; 跳 过 名 为 TEST 一 1 的 文件 
LOADING TEST 一 2 ;正在 把 名 为 TEST 一 2 的 文件 调 出 
OK ; 调 出 结束 

SAVE 


功 能 :把 内 存 的 内 容 存 入 磁带 上 。 

格 式 :SAVE[“ 文 件 名 中 

缩 写 :SA， 

解 释 :(1) 内 存 中 的 程序 或 数据 , 断 电 后 一 般 不 能 保存 ,需要 保存 的 程 订 和 数据 可 以 存在 磁带 上 ， 
以 便 多 次 使 用 。 
《2) 每 存 入 程序 或 数据 都 应 起 一 个 文件 名 , 当 用 户 想 使 用 某 一 个 程序 ,只 需要 知道 文件 名 ， 
使 用 LOAD 指令 可 把 该 文件 调 入 内 存 中 。 

程序 例 ， 
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SAVE ; 存 入 文件 无 名 


WRITING ;正在 存 入 
OK ; 存 入 结束 
SAVE“TEST” ; 存 入 名 为 TEST 的 文件 
WRITING TEST ;正在 存 入 
OK ; 存 入 结束 

LOADY? 


功 能 :检查 所 存 入 的 程序 是 否 正确 ,并 能 否 正确 调 出 。 

格式 :LOAD? [文件 名 约 

缩 写 :LO.? 或 LO.P 

解 释 :(1) 用 LOAD? 检查 磁带 上 的 程序 和 内 存 中 的 程序 是 否 相同 。 不 指定 文件 名 将 调 出 最 后 存 
入 的 程序 进行 核对 。 
(2) 若 指定 了 文件 名 (i6 个 字符 内 ), 计 算 机 将 跳 过 其 它 程序 ,找到 所 指定 的 文件 。 用 
LOAD? 检查 存在 磁带 上 的 程序 十 分 重要 ,在 存 入 程序 时 不 要 漏 过 这 一 步 。 


程序 例 ; 
LOAD? ;取出 最 后 存 入 的 程序 
LOADING TEST ;正在 核对 
OK ; 存 入 正确 ,结束 
LOAD?“TEST?” ;取出 名 为 TEST 的 文件 
LOADING TEST ;正在 核对 
OK ; 存 入 正确 ,结束 
? TP ERROR ; 存 入 错误 ( 调 出 错误 ) 
OK 

4.5 基本 指令 

赋 值 

功 能 :给 变量 赋值 


格 式 :变量 =[ 字 母 . 常 数 . 字 符 串 或 语句 ] 

解 释 :(1) 赋 值 是 把 等 号 右边 的 值 赋 给 左边 。 左 边 必 须 是 变量 。 
(2) 在 等 号 右边 的 变量 必须 预先 被 定义 。 未 被 定义 的 数值 变量 将 自动 地 赋 给 0 值 。 未 被 定 
义 的 字符 变量 被 自动 赋 给 “空格 ”。 
《3) 等 式 两 边 变量 类 型 必须 相等 , 即 当 左 侧 是 数值 变量 右 侧 也 是 数值 的 ; 当 左 侧 是 字符 变量 
右 侧 也 是 字符 的 。 如 : 


RE | AS$=A 


YY 一 AxyxX Y$ 王 AxX 十 “102?” 
X$=“&H” 十 A$ X=“&H” 十 A$ 


程序 例 : 
10 REM x* LET x* 
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20 A=10 ;数值 变量 被 赋值 10 


30 A$=“ABC?” ;字符 串 变量 被 赋值 ABC 
40 PRINT A$4:A ;打印 变量 A$ 和 A 的 值 
RUN 
ABC 10 ;得 出 的 结果 
PRINT 
功能 :将 程序 运算 结果 在 屏幕 上 打印 出 来 。 
格 式 : 
常 数 常 数 | 
人 1| 变 量 ||1 | 变 量 
PRINT" 字 符 昌 |" | 表 过 式 || 用 


字符 串 字符 串 
缩 写 :? 或 了 . 


解 ” 释 : 用 PRINP 可 以 在 屏幕 上 打印 出 程序 运行 的 结果 ,也 可 打印 字符 串 、 变 量 . 常 数 等 。 在 变量 、 
字符 串 或 常数 之 间 揪 入 分 号 ,可 以 依次 打印 ;在 变量 .字符 串 或 常数 之 间 揪 入 逗号 可 按 格 式 
打印 。 

INPUT 

功能 :在 程序 运行 期 间 从 键盘 键入 数字 数据 。 

格 式 :INPUT5C" 字 符 串 9]| | 变量 C, 变 量 ，… 


缩写 :L 

和 解 “ 冯 :0) 当 程序 执行 INPUT 指令 ,在 屏幕 上 打印 问号 等 待 从 键盘 上 输入 数据 ,输入 数据 后 执行 
个 指令 。 
(2 字符 串 是 一 串 字符 , 它 将 被 显示 在 屏幕 上 ,在 其 之 后 显示 问号 。 
(3) 变 量 分 成 数值 变量 和 字符 变量 ,在 INPUT 指令 中 ,数值 变量 只 接受 数字 (0 一 9) 组 成 的 
数 。 字 符 变 量 可 以 接受 除 逗 号 外 的 所 有 字符 。 
(4) 假 如 变量 多 于 一 个 ,必须 用 逗号 把 变量 分 开 ,而 输入 数据 也 须 放 逗号 分 开 以 区 别 输入 到 
不 同 的 变量 。 否 则 回 车 之 后 将 出 现 两 个 问号 ,等 待 给 下 一 个 变量 送 数 。 


程序 例 ; 
10 REM * INPUT x* 
20 INPUT“A 王 ”A 请 输入 数据 到 A 
30 INPUT“B 一 ”5B ;请 输入 数据 到 B 
40  C 一 A 十 B 5C 等 于 A 十 B 
50 D=A 一 B ;A、B、C 的 数值 在 一 32768 一 十 32768 之 间 
60 下 王 AxB ; 
70 PRINT“A 十 B”;C ;打印 A 十 B 


80 PRINT“A 一 B”;D $ 
90 PRINT“A *B2;E ; 


LINPUT 
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功能 :输入 字符 串 
格 式 :LINPUTC“ 字 符 串 站 | 字符 变量 


解 释 ;(1)LINPUT 与 INPUT 不 同 之 处 在 于 可 以 输入 包括 逗号 在 内 的 符号 。 可 输入 的 字符 数 最 
多 为 31 个 。 仅 可 以 指定 一 个 字符 变量 。 
(2)LINPUT 指令 中 只 要 用 了 提示 用 的 字符 串 , 尽 管 在 打印 指令 中 不 在 指定 也 可 以 打出 用 
于 提示 的 字符 串 , 所 以 在 必要 时 需 把 提示 除去 。 
(3)LINPUT 指令 是 把 提示 字符 串 与 字符 变 最 进行 了 相 加 处 理 “ 即 等 冯 为 
AS$ = 字符 串 "+AS 
(4) 执 行 LINPUT 指令 在 屏幕 上 不 出 现 问号 。 
程序 例 : 10 LINPUT7STRING=”;AS$ 


20 PRINT AS$ 
RUN 
STRING 一 A2,3 ;输入 数据 “STRING= "是 提示 。 
STRING 王 和 A2.3 ;打印 结果 。 

CLEAR 

功能 :清除 内 存 中 所 有 变量 的 值 。 

格 式 :CLEAR 

缩写 :CLE 

解 ” 释 :数字 变量 清除 之 后 变 为 0, 字 符 变 量变 为 空 。 

程序 例 ; 
10 X$=“ABC” ;字符 串 变 量 值 为 ABC 
20 Y 王 178 ;让 立 王 178 
30 PRINT X$ ;Y ;打印 X$ .Y 的 值 
RUN ;运行 
ABC 178 
OK 
CLEAR ;执行 清除 指令 
RUN :运行 
0 iY 王 0 XJ$ -= 空 
OK 

DIM 


功能 :定义 一 个 数据 矩阵 或 数组 ,并 在 内 存 开辟 数据 区 域 。 

格式 ;DIM 变量 名 CmlC,m2]]5, 变 量 名 nilC,n2]] 

缩写 :DIL. 

解 释 ;DIM 定义 的 数值 和 矩阵 可 以 是 数值 型 的 ,也 可 以 是 字符 型 的 。 所 定义 数组 和 抢 阵 的 大 小 受 
到 内 存 容 量 的 限制 。 一 般 数组 可 达 X(255), 和 抢 阵 可 达 B(43,43), 当 定义 的 数组 多 时 ,每 个 
数组 还 要 小 。 

程序 例 ;(1) 定 义 数 值 变量 
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10 REM x* DIM 一 一 (1) * 


20 DIM A(3),B(3,3) 
30 FOR I=0TO'3 


40 AGO)=I 
50 PRINT ACT); 


60 NEXT 
70 PRINT :PRINT 
80 FOR I=0TO3 1 


90 FOR J=0TO 3 
100 BGLJ=Ix 10 十 ] 
110 PRINT BCLJ)， ;给 B(I,J) 存 入 4X4 的 数字 和 矩 阿 
120 NEXT 
130 NEXT 
(2) 定 义 字 符 串 变 量 
10 REM x* DIM 一 一 一 (2) x 
20 DIMAS$(3),B$(3,3) 
30 FOR I=0TO 3 
40 A$G)=“TEST? 十 STR $ (OD) ;STR $ 为 字符 函数 
50 PRINT ASY$ 0D) 
60 NEXT 
70 PRINT 
80 FOR I=0TO 3 
90 FOR J=0TO 3 
100 B$G,J)=“TOKYO” 十 STR$ (CD-STR $ GJ) 
110 PRINT B$(L,J) 
120 NEXT 
130 NEXT 


;把 0 一 3 存 入 AD) 中 


功 能 :指定 程序 跳 转 的 行 号 。 
格 式 :GOTO N 
N 一 表示 行 号 
缩写:G. 
解 释 :用 以 改变 程序 的 流向 ,如 使 用 GOTO 20, 程 序 跳 到 行 号 为 20 的 语句 开始 执行 。 


10 REM xx GOTO x 
20 AV$=INKEY $ (0) ;任意 按 一 键 程序 继续 
30 PRINT AS$ 
40 IF A$=“Z2?THEN END ; 按 下 2Z 键 程序 结束 ,否则 继续 
50 GOTO 20 ;再 跳 回 20 行 重 行 执行 
GOSUB 
功能: 转 入 指定 行 号 的 子 程序 继续 执行 。 子 程序 的 结尾 必须 用 RETURN 指令 返回 。 
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格 式 ;:GOSUB N 
缩写 :GOS. 
解 ， 释 : 当 一 部 分 程序 被 频繁 使 用 , 若 反复 写 多 次 ,将 增加 程序 的 长 度 。. 这 时 可 把 频繁 使 用 的 那 一 段 
程序 单独 提出 来 作为 子 程序 ,每 次 需要 执行 那 段 程序 时 用 GOSUB 指令 调用 ,而 被 调用 的 
子 程序 必须 用 RETURN 返回 。 一 般 子 程序 写 在 程序 的 后 面 。 
程序 例 ， 
10 REM x* GOSUB x* ;10 一 170 是 主 程序 
100 FOR I=1TO 25 
110 GOSUB 1000 ;调子 程序 
120 NEXT 
130 FOR I=25 TO 1 STEP 一 1 ;循环 语句 ,但 步 长 为 一 1。 
140 GOSUB 1000 ;调子 程序 
150 NEXT 
160 PRINT“END?” 
170 END 四 
1000 FOR J=0 TO II ;1000 一 1040 是 子 程 序 
1010 PRINT“*?” 
1020 NEXT 
1030 PRINT 
1040 RETURN 
RETURN 
功 能 :从 子 程序 返回 。 
格式 ;RETURN[LN] 
N-~> 指 定 返回 的 行 号 ,可 以 不 指定 。 
缩写 :RE. 
解释:RETURN 和 GOSUB 联合 使 用 。 当 不 指定 行 号 ,RETURN 指令 一 被 执行 ,返回 GOSUB 
语句 的 下 一 个 行 号 并 继续 执行 主 程序 。 
程序 例 ; 参 看 GOSUB 一 节 
IF~THEN( 条 件 指令 ) 
功 能 :根据 条 件 式 的 值 确 定 程序 的 转向 。 
行 号 
格 式 ;IF 条 件 式 THEN| 训 | 
缩写 :IF T. 
解 释 ;:(1) 条 件 式 可 以 是 算术 、 字 符 串 或 罗 辑 表达 式 。 行 号 是 所 要 跳 转 的 行 号 。 语句 是 一 条 合法 的 
BASIC 语句 供 执行 用 。 
(2)IF 与 THEN 必须 配对 出 现 。 当 条 件 式 成 立 则 执行 THEN 后 的 内 容 。 如 : 
IF X>0THEN 100 
这 一 语句 的 意思 是 假如 X 大 于 零 , 则 跳 转 到 第 100 行 ,否则 顺序 执行 。 
又 如 ; 
IF A$=“Y2?THEN PRINT “GOOD” 
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这 一 语句 的 意思 是 , 若 A$=“Y”, 则 打印 出 GOOD 来 。 


程序 例 : 
10 REM x* IF 一 THEN x ; 
20 PRINT“PUSH Y!?; ;打印 PUSH Y! ,请 按 Y。 
30 A$=INKEY $(C) 
40 IF A$<<>“Y?THEN BEEP， ;BEEP 指令 被 执行 将 发 出 “中 ” 声 。 
GOTO 30 
50 PRINT ;PRINT“PRESS Y” ; 
60 PRINT ; 
70 GOTO 20 
行 号 30 是 准备 从 键盘 上 接收 字符 。 
行 号 40 是 判断 所 键入 的 是 否 是 立 , 如 果 不 是 发 出 “ 咬 ?” 的 一 声 , 跳 回 30 行 准备 再 次 接收 。 
若是 Y, 则 顺序 执行 第 50 行 。 


FOR 一 NEXT( 循 环 指令 ) 
功 能 :反复 执行 FOR 与 NEXT 之 间 的 程序 行 。 
格 式 :FOR 变量 = 初始 值 TO 结束 行 STEP 步 长 .…… 


NEXT 
解 释 ; 


程序 例 : 
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《1) 变 量 为 数值 变量 称 为 循环 变量 ,初始 值 . 结 束 值 和 步 长 均 为 整数 , 步 长 可 正 可 负 。 省 略 
STEP 步 长 时 , 步 长 为 1。 

(2)FOR 表示 循环 开始 ,NEXT 表示 循环 结束 ,两 者 需 配对 出 现 。 例 如 

FOR I=1TO10STEP 2 

[处 理 程序 

NEXT 

当 程 序 执 行 到 FOR 语句 时 , 先 把 循环 变量 I 置 为 1, 执行 下 面 的 处 理 程序 ,到 NEXT 语句 
返回 FOR .。 这 时 循环 变量 按 STEP 中 所 规定 的 步 长 增加 ,如 STEP2 表示 步 长 为 2, 这 时 循 
环 变量 的 值 由 1 增 到 3, 然 后 再 执行 一 遍 处 理 程序 。 如 此 循环 ,循环 变量 依次 为 5,7,9 当 大 
于 10 时 ,循环 结束 。 执 行 NEXT 的 下 一 行 语句 。 

(C3)FOR 与 NEXT 必须 配对 出 现 ,并 且 NEXT 之 后 不 可 加 循环 变量 ,这 一 点 希 引 起 注意 。 


FOR I=1TO 10 ;三 重 循环 , 先 内 后 外 
FOR J=1TO 20 ;在 NEXT 之 外 ,不 可 加 变量 
| FoRKalros 
本 
NEXT 
LNEXT 
10 REM * FOR 一 NEXT(1) x 
20 FOR I=0TO 10STEP 2 
30 PRINT T; 
40 NEXT ;打印 循环 变量 的 值 
RUN 


0 24.6 8 10 
OK 
10 REM x* FOR 一 NEXT(2) * 
20 CLS 
30 FOR I=1TO 20 
40 FOR J=1TOI ;三 重 循环 
50 FORK=1TOJ 
60 PRINTX” 
70 NEXT ;用 X 建立 图 形 
80 _ PRINT 
90 NEXT ;PRINT 并 不 是 可 有 可 无 ,起 到 换行 作用 
100 PRINT 
110 NEXT 
ON 
功能 :通过 变量 控制 执行 不 同 的 程序 。 即 选择 执行 功能 。 
GOTO 
GOSUB 8 
格 式 :ON 变量 ET [ 行 号 , 行 号 ……] 
RESTORE 
缩 ， 写 :0. 
解释; 下 面试 举 一 例 说 明 ON 指令 的 功能 。 由 下 例 可 知 ,原来 用 5 条 语句 ,现在 只 写 一 条 就 够 了 。 
IF X=1THEN 1000 
IF X=2 THEN 2000 
IF X=3 THEN 3000 
IF X=4THEN 4000 
IF X=5 THEN 5000 
y ”等 效 于 
ON X GOTO 1000,2000,3000,4000,5000 
图 4. 1 表示 了 上 述 语句 的 含义 。 d 


PP 
二 变 


本 
0 6 


1000 -2000 3000 4000 5000 顺序 


图 4.1 ON 语句 流程 图 
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程序 例 


10 REM x* ON 一 GOSUB * 


20 INPUT“KEY IN 1 一 6”;N ;20 行 输入 N 值 1 一 6 

30 ON N GOSUB 100,200,300,400,500,600;30 行 是 ON 语句 ,在 N 为 1 一 6 以 内 转 入 子 程序 
40 IF N<1OR N>6THEN 20 ;40 行 条 件 跳 转 ,N 在 1 一 6 之 外 , 转 回 20 行 。 

50 PRINT Ni 一” X9$ - ;350 行 是 打印 语句 ,打印 X$ 的 值 。 

60 GOTO 20 

100 X$ =“HOLLO 1?:RETURN ;100 一 600 是 子 程序 


200 X 和 =“ HOLLO 2”:RETURN 
300 X$=“HOLLO 3”:RETURN 
400 X$=“"HOLLO 4”:RETURN 
500 X$=“HOLLO 5”:RETURN 
600 X$ 一" HOLLO 6”:RETURN 


SWAP 
功 能 ， 
格式 ; 
缩写， 


解 . 释 : 


程序 例 : 
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2 个 变量 值 交 换 
SWAP 变量 ,变量 
可 将 两 个 变量 的 内 容 进行 交换 ,但 是 数值 变量 和 字符 变量 的 内 容 不 能 互 换 , 因 为 两 个 变量 


的 类 型 不 同 。 

10 REM x* SWAP > 

20 DIM A(10) 

30 FOR I=1TO 10 

40 READ ACD 

50 PRINT ACTD); 

60 NEXT 

70 FOR I=1TO 10 

80 FOR J=1TO 10 

90 IF A(D)<AG) THEN SWAP A(D,AG) 
110 NEXT 

110 NEXT 

120 PRINT 

130 FOR I=1TO 10 

140 PRINT A(D; 

150 NEXT 

160 DATA 2,3,5,1,7,4,8,9,6,0 


OK 
40 行 和 160 行 是 读数 据 语句 ,下 面 将 介绍 。 这 两 行 语 句 的 目的 是 把 160 行 中 的 数据 读 入 A 


(TD 中。 
第 50 行 打印 的 结果 为 交换 之 前 的 ACT 。 
第 90 行为 交换 行 , 通 过 条 件 判 定 可 把 数字 大 小 按 次 序 重新 排 在 AGD) 中 。 
第 140 行为 打印 语句 ,可 把 AGD) 中 经 过 交换 的 值 打 印 出 来 。 
REM 
功 能 :注解 
格式 :REM[ 注 释 内 容 ] 注释 内 容 不 超过 255 个 字符 。 
缩 写 :， 
解释 ;REM 之 后 的 内 容 不 执行 仅 供 注 释 之 用 。 可 以 随意 键入 程序 说 明 ,使 用 日 期 等 内 容 。 
程序 例 ， 
10 ”xx REM x ;用 ”号 代替 REM 
20 REM FBASIC V1.0 
30 REM 1989.6.1 
RUN ;运行 后 什么 都 没有 显示 
OK 


READ 
功 能 :把 写 在 DATA 指令 中 的 数据 读 出 来 。 
格 式 :READ 变量 [, 变 量 , 变 量 ,……] 
缩写:REA. 
解释 :有 读 指 令 F 本 ADb ,就 一 定 要 有 数据 指令 DATA。 而 数据 的 个 数 , 一 般 不 能 少 于 读 的 次 数 ,但 
是 ,如 果 用 了 RESTORE 指令 重新 设置 了 数据 的 指针 ,可 使 数据 被 重读 。 
程序 例 ;(1) 用 X 作为 变量 读数 据 
10 REM x* READ 一 一 一 (1) * 
20 FORI=1 TO 10 
30 READX ;注意 : 读 入 到 变量 X 的 值 不 能 被 保留 ， 
40 PRINT Xi ;因为 X 的 值 每 次 都 将 被 新 读 入 的 值 所 
50 NEXT ;代替 ,最 后 X 中 保留 的 值 是 9。 
60 DATA 3,4,1,6,2,7,8,3,4,9 
RUN 
341627834 9 
OK 
(2) 用 字符 串 变 量 读数 据 
10 REM x* READ 一 一 一 (2) x 
20 READAS$,B$,C9$ 
0 PRINT AS$ ”5B$ .2” 
0. PRINT AS$; ”3C$ ;2 
50 DATA GOOD,MORNING ,EVENING ;三 个 数据 分 别 被 读 入 AS$ ,B$ ,C$ 
RUN 
GOOD MORNING. 
GOOD EYENING, 
OK 
(3) 用 数组 变量 读数 据 
10 REM x* READ 一 一 一 (3) * 


心 CD 
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20 DIM A(5) 
30 FOR I=0TO5 

40 READAGD ;数据 被 读 入 A(I) 中 保存 起 来 
50 PRINT A(CI); 

60 NEXT 

70 DATA 9,1,8,3,4,8 

RUN 


DATA 
能 :定义 读 指 令 所 需 的 数据 。 
式 :DATA 常数 [, 常 数 ,常数 ， 及 ] 
写 :D. 
释 :常数 分 为 数值 常数 和 字符 常数 (字符 串 ) ,数据 指令 和 READ 指令 配合 使 用 。 符号 可 以 放 在 
引号 内 。 如 ， 
DATA ABC,DE,“,”,F 
逗号 放 在 引号 中 了 。 
RESTORE 
功 ”能 :把 数据 DATA 中 的 指针 指向 第 一 个 数据 ,使 DATA 的 数据 可 以 重新 使 用 。 
格式 :RESTORE 行 号 ] 
行 号 ~DATA 所 在 的 行 号 
缩写 :RES. 
解 ” 释 : 当 有 一 些 数据 有 重复 使 用 的 情况 ,这 时 用 RESTORE 设置 重复 部 分 的 指针 ,使 重复 的 数据 
可 以 用 读 指 令 重读 。 
程序 例 :10 REM * RESTORE * 
20 RESTORE 1010 20 行 把 数据 指针 设 在 1010 行 
30 FOR I=0TO5 
40 READ A ;40 行 把 1010 行 数 据 读 出 
50 PRINT Al; 
60 NEXT 
70 PRINT 
80 RESTORE 1000 #80 行 把 数据 指针 设 在 1000 行 
90 FOR I=0TO5 
100 READ A ?100 行 把 数据 读 出 来 
110 PRINT Ai; 
120 NEXT 
130 REM 
1000 DATA 23,43,55,65,42,9 
1010 DATA 12,56,34,68,53，,2 
RUN 
12 56 34 68 53 2 打印 出 的 结果 
23 43 55 65 42 9 
OK 
POKE 
格 式 :可 直接 把 数据 放 入 内 存单 元 。 
100 


功 
格 
缩 
解 


格式 :POKE 内 存单 元 地 址 , 欲 放 入 内 存单 元 的 数 , 数 ~ 在 0 一 255 范围 内 。 

缩 ， 写 :PO. 

解释: 这 是 一 个 比较 难 理解 的 指令 。 尤 其 是 对 于 没有 系统 地 学 习 过 计算 机 知识 的 读者 ,不 太 明白 
这 个 指令 的 作用 。 这 个 指令 使 人 们 可 以 直接 修改 内 存 的 数据 ,是 很 有 用 的 一 条 指令 。 

PEEK 

功能 :PEEK 是 一 个 函数 ,用 于 读 出 内 存单 元 的 数据 。 

格 式 :PEEK( 变 量 ) 

缩 “ 写 :PE. 

解 释 : 这 个 指令 仅 用 于 读 出 内 存单 元 的 数据 而 不 改变 内 存单 元 的 值 。 

程序 例 ， 

10 REM * POKE * 

20 CLEAR &H7600 


30 D=0 

40 FORA=&H7600 TO &H761F ;40 一 70 行 是 在 内 存 7600 到 

50 POKE A,D ;761F 单元 分 别 放 入 0 一 31 

60 D=D+1l 

70 NEXT 

80 FOR A 王 &H7600 TO &H761F ;80~110 行 是 把 7600 一 761F 单元 的 数据 读 出 ， 
90 RD=PEEK(A) ;并 用 16 进 制 的 形式 显示 出 来 。 

100 PRINT“ ”HEXS$ (CRD); ;HEX.$ (RD) 便 是 表示 16 进 制 数 的 指令 ,后 面 将 介绍 。 
110 NEXT 

4.6 屏幕 控制 指令 

LOCATE 


功 能 :指定 数据 在 屏幕 上 的 位 置 。 
格式;:LOCATE X,Y 
X~~ 水 平方 向 位 置 0 一 27 
Y 一 垂直 方向 位 置 0 一 23 
缩 ， 写 :LOC 
解 释 :LOCATE 是 用 于 在 背景 面 定 位 的 指令 。 屏幕 如 图 4. 2 所 示 。 利用 LOCATE We 


在 屏幕 上 的 位 置 。 SS 28 列 


(0D，0) 风 2) 


程序 例 ， 
10 REM * LOCATE - 


20 CLS 0， 23) -图 4.2 屏幕 示意 
30 FOR I=0TO 20 
40 LOCATE I,I:PRINT“* ”; ;第 40 行 利用 变量 I 把 * 打印 在 不 同位 置 上 
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50 NEXT 
60 LOCATE 0,10 ;程序 最 后 把 光标 定位 在 (0,10) 位 置 上 


COLOR 


功能 :让 背景 面 某 个 位 置 显示 某 种 颜色 。 
格 式 :COLORX,Y,n 

X 一 水 平方 向 座 标 0 一 27 
Y~> 垂 直方 向 座 标 0 一 23 
n-~> 配 色 代 码 0 一 3 


缩写 :COL. 


(9.0) 


《0.1) 


《0, 3) 


(0.5) 


《0.7) 


《0, 9) 


(0.11) 


(0. 13) 


《0.15) 
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《0. 21) 


《0. 23) 
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并 寺村 寺 半 寺 半 村 村 
加 轴 放 攻 加 最 名 里 司 攻 请 因 轿 必 二 时 计 国 轩 国 轴 氏 
并 半音 寺 间 寺 和 寺 
下 下 下 下 下 下 下 开 下 下 
寺 半 二 于 基 时 寺村 寺村 
柄 及 罚 请 轩 国 加 属 莉 昌国 主语 后 时 辐 国 同 羡 图 天 
和 各 可 到 下 下 和 下 到 王 

: 十 革 


图 4.3 屏幕 可 分 成 若干 个 16X 16 方块 


解 释 :(1) 图 4. 3 表示 了 一 个 屏幕 ,可 按 4 格 组 成 一 个 个 方块 。 利 用 COLOR 指令 指定 X,Y 座 标 ， 
可 把 方块 的 内 部 按 配色 代码 加 以 配色 。 背 景 用 配色 代码 的 含义 参见 封 3 和 表 4. 6。 
A、B.C.D 四 块 组 成 16X16 点 阵 即 四 个 字符 大 小 


例如 ;COLOR 10,10,3 可 把 座 标 (10,10) 所 在 的 方块 中 的 其 余 三 块 A,B,C 按 配色 代码 3 配 


色 
什么 。 


〈2)COLOR 只 改变 背景 面 的 颜色 ,在 使 用 COLOR 之 前 ,要 注意 CGSET 中 所 选择 的 板 代 码 是 


程序 例 :10 REM x* COLOR x 
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20 CLS 

30 FOR I=0TO 447 

40 PRINT CHR $ (195); 

50 NEXT 

60 FORC=0TO 3 

70 _ COLOR 5+TCx3,5 十 Cx2,C ;第 70 行 指定 0 一 3 四 种 颜色 
80 NEXT ;屏幕 上 有 4 块 被 配 出 不 同 颜色 
90 LOCATE 0,20 


CGEN 
功能 :确定 背景 面 和 卡通 面 所 采用 的 符号 图 表 。 
格 式 :CGEN n 
n 一 组 合 代码 0 一 3 
缩 ， 写 :CGE. 
解 释 :(1) 表 4.4 表 示 了 组 合 代 码 所 表示 的 含义 。 表 中 的 A 是 指 符号 图 表 A;B 是 指 符号 图 表 B。 


在 附录 中 有 符号 图 表 的 含义 ,参见 附录 。 
符号 图 表 A :各 种 卡通 图 案 (封底 )。 
符号 图 表 B: 各 种 符号 .数字 及 背景 图 案 等 ( 封 三 ) 。 
(2) 利 用 CGEN 指令 可 把 A 中 所 示 的 卡通 图 案 和 B 中 所 示 数 字 、 英 文 及 背景 图 案 , 确 定 在 
卡通 面 还 是 在 背景 面 上 使 用 。 可 以 把 卡通 图 案 表 示 在 背景 面 ,也 可 把 符号 表示 在 卡通 面 。 
一 般 ,已 经 事先 设 定 为 CGEN2。 
利用 CTRH 二 [D| 键 可 以 设 定 CGEN2。 即 两 者 等 价 ,但 一 方 只 需 按键 , 另 一 方 要 输入 5 个 符 
号 。 

表 4.4 符号 图 形 的 设 定 表 


含 义 


背景 面 与 卡通 面 均 使 用 A。 


背景 面 使 用 A, 卡 通 面 使 用 B。 


背景 面 使 用 B, 卡 通 面 使 用 A。 
背景 面 与 卡通 面 均 使 用 B。 


10 REM xx CGEN x ;20 行进 行 一 系列 初始 化 
20 CLS;SPRITE ON:CGSET 0,1 ;30 一 50 行 把 符号 表 显 示 在 屏幕 上 
30 FOR I=32 TO 255 
40 PRINT CHR $ (T); 
50 NEXT ;60 行 定义 “飞鱼 ” 
60 DEF SPRITE 0,(0,1,0,0,0) 王 CHR 
$(64) 十 CHR $ (65) 十 CHR $ (66) 十 CHR $ (67) 


70 SPRITE 0,100,150 570 行 设 定 飞鱼 出 现 的 位 置 

80 PAUSE 100:BEEP 

90 CGEN':0 ;90~150 行 设 定 符号 表 

100 PAUSE 100;BEEP ;四 种 变化 循环 出 现 

110 CGEN 1 ICHR $ 64,65,66,67 对 应 于 图 A 是 飞鱼 ， 
120 PAUSE 100;BEEP ;对 应 于 图 B 是 A.B、C, 请 参阅 附录 。 
130 CGEN 3 

140 PAUSE 100:BEEP 

150 CGEN 2 


160 GOTO 80 
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CLS 


功能 :清除 屏幕 并 使 光标 返回 左上 和 角 。 

格式 :CLS 

缩 “ 写 :CL. 2 

解释 :清除 背景 面 同时 变 为 黑色 。 但 不 影响 卡通 面 的 图 形 。 在 把 BG 图 形 复制 到 背景 面 中 (利用 


CGSET 


BG 绘图 程序 制作 的 图 形 ) 时 ,必须 先 使 用 CLS 指令 ,再 执行 VIEW 指令 ,和 否则 出 错 ! 


功能 :决定 背景 面 和 卡通 面 所 使 用 板 代码 。 
格 “ 式 :CGSETCm]C,n] 


m-~> 背 景 面 的 板 代码 0~…1，m 称 为 背景 代码 。 
n-> 卡 通 面 的 板 代码 0~…2,n 称 为 卡通 代码 。 


缩写 :CG. : 
解 释 :(1)CGSET 指令 是 从 预先 准备 好 的 色彩 组 合 中 挑选 颜色 ,CGSET 只 是 指定 板 代码 。 色 彩 
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组 合 可 参见 封 3, 图 4.4 是 其 示意 
《2? 背 景 面 有 两 种 组 合 ( 板 代 码 ? 可 以 指定 。 卡 通 面 有 3 种 组 合 ( 板 代码 ) 可 供 指定 ; 
《3) 图 中 卡通 板 代码 表示 的 三 组 图 形 中 又 分 别 有 0,1,2,3 四 个 代码 。 这 四 个 代码 称 配色 代 
码 , 每 个 配色 代码 指定 三 种 色彩 。 配 色 代 码 不 在 CGSET 指令 中 指定 ,而 在 第 二 章 学 过 的 两 
个 指令 : 

DEF SPRITE…… 

DEF MOVE(CN) 一 …… 
中 指定 。 卡 通 代 码 n 和 配色 代码 一 起 可 以 指定 卡通 及 其 各 种 动作 的 颜色 。 
〈4) 图 中 背景 板 代码 表示 的 两 组 图 形 也 分 别 有 四 个 配色 代码 ,这 四 个 配色 代码 在 COLOR 
指令 中 指定 。 
(5)CGSET 指令 的 缺 省 值 为 ， 

CGSET 1，,1 
即 当 计算 机 进入 BASIC 状态 后 ,卡通 面 和 背景 面 均 为 代码 1 的 状态 。 
《6) 板 代码 是 对 整个 屏幕 面板 的 操作 代码 , 当 板 代码 一 改变 ,卡通 面 上 的 所 有 卡通 ,或 者 背 
景 面 上 的 所 有 背景 都 将 改变 。 如 何 改变 由 CGSET 指令 进行 指定 。 
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为 了 便于 理解 ,对 卡通 面 代码 说 明 如 下 : 


CGSET 1,1 ;指定 卡通 面板 代码 为 1 
DEF SPRITE 0， (0，1 0,0,0) 一 。……。 
DEF MOVE(N) 王 SPRITE(0,3,1,10,0,3) ;指定 配色 代码 分 别 为 0 和 3 
为 了 便于 理解 ,对 背景 面 代码 说 明 如 下 ; 
CGSET 1,1 ;指定 背景 面 代 码 为 1 
COLOR 10,10,3 ; 座 标 (10,10? 附 近 的 四 块 为 3 号 配色 代码 。 
PALET 


功 能 :把 配色 代码 (0 一 3) 所 指定 的 3 种 颜色 代码 重新 设 定 。 
格 式 :PALET|s Cl1,C2,C3，C4 


B-~>~ 表 示 背 景 面 
S~> 表 示 卡 通 面 
n 一 配色 代码 (0 一 3) 
Cl1-~>~ 指 定 底 背景 颜色 
Cl1 一 4 一 颜色 代码 
C2,C3,C4 分 别 对 应 配色 代码 所 指定 的 左 ,. 中 , 右 三 块 的 配色 。 如 ， 


交 
拓 色 代 间 < 


解 释 :(1) 表 4.5 中 的 代码 可 以 用 以 改变 卡通 ,背景 与 底 背 景 的 颜色 。 
《2) 底 背景 的 颜色 被 显示 在 卡通 面 , 背 景 面 之 后 。 
《3) 颜 色 由 彩色 发 生 器 产生 。 
《4?16 进 制 和 十 进 制 同 时 标 在 配色 代码 表示 的 图 形 中 ,请 参见 封 3。 下 面试 举 一 例 


上 行为 10 进 制 
下 行为 16 进 制 
查 表 4. 5 可 知 ,10 进 制 54 对 应 16 进 制 36,22, 对 应 于 16,2 对 应 于 02。 
(5) 下 面试 举 一 个 颜色 改变 的 例子 。 
CGSET 1,0 
DEF SPRITE 0,(0,1,0,0,0) 一 ……， 
在 上 例 中 首先 指定 卡通 板 代码 为 0; 再 指定 0 号 卡通 板 中 的 0 号 配色 代码 ,其 代码 为 图 
4.5(a), 当 执行 下 面 指令 后 颜色 代码 改 就 成 图 4. 5(b) 。 在 程序 中 使 用 ?ALET 指令 ,一 般 用 在 指定 
板 代 码 和 配色 代码 的 指令 之 后 。 
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黑色 


PALETS 0 ， 1 ， 48 ， 25 ， 18 


个 个 个 人 
卡通 图 案 C4 
配色 代码 ak 
Re 
底 背 景色 C2 
图 4.5 


这 里 , 先 执行 CGSET 1,0 再 执行 PALETS 指令 则 与 图 4. 5 的 例子 一 样 结果 。 见 下 例 ; 
程序 例 ;10 REM x* PALET x* 
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4. 7 


20 SPRITE ON 

30 DEF SPRITE 0,(3,1,0,0,0) 王 CHR $ (88) 
十 CHRS$(89) 十 CHR$ (90) 十 CHR$ (91) 

40 SPRITE 0,100,150 


RUN 
OK 
CGSET 指令 的 缺 省 值 为 :CGSET1,1 ,所 以 卡通 板 代码 为 1, 配色 代 码 为 3( 第 30 行 中 定 
义 )， 
CGSET 1,0 ; 设 定 卡 通 板 代码 0。 
OK 
PALETS 0,&H00,&H30,&H19,&H12 ;用 16 进 制 表示 颜色 代码 
OK 


上 面 共 讲 了 多 神代 码 ,为 了 便于 学 习 特 小 结 如 下 : 
表 4.6 各 种 代码 比较 


疆 


心 六 型 吕 ”还 玛 郊 正 ， 酒 于 同 本 | 


MOVE 系列 指令 


DEF SPRITEE 
CGSET 工 DEF MOVE 
COLOR 


MOYVE 系列 指令 是 控制 卡通 图 案 在 卡通 面 上 运动 的 指令 群 。MOVE 指令 的 运用 可 使 游戏 程 
序 的 编写 更 加 简单 ,动作 更 加 生动 。 

DEF MOVE 

功 能 :定义 卡通 动作 。 


可 使 用 的 卡通 共有 16 种 ) 


格 式 ;DEF MOVECn)= 王 SPRITE(A,B,C,D,E,F) 


缩 


写 


108 


n- 被 定义 的 卡通 动作 (0 一 ?7) 
A 一 卡通 种 类 见 封底 (0 一 15) 
B 一 卡通 的 运动 方向 (0 一 8) 
C-~ 运 动 速度 (1 一 255) 

D-~~ 位 移 量 (1~255) 

E 一 优先 麻 C0 一 1) 

FE-> 配 色 代 码 


:了 DE. M. 


解 释 ;(1)DEF MOVECn) 指 令 最 多 可 以 定义 卡通 在 8 个 方向 上 的 动作 .为 了 产生 动画 效果 ,每 一 
个 动作 至 少 应 由 两 个 卡通 姿势 组 成 , 当 由 一 个 姿势 组 成 的 动作 ,比如 玛丽 沃 跳 组 成 动作 ,就 
不 会 产生 动画 效果 .。 卡通 姿势 较 少 ,在 不 同 运动 方向 上 的 动作 容易 重复 。 比 如 :乌龟 在 8 个 
方向 上 都 只 能 是 “ 走 ” 一 个 动作 。 
(2) 当 指定 了 卡通 运动 方向 ,卡通 的 动作 由 DEF MOVE (n) 自 动 给 出 。 不 同方 向 给 出 不 同 
的 动作 。 
(3) 用 DEF SPRITE 可 以 直接 调 出 封底 图 A 中 的 卡通 姿势 ,而 用 DEF MOVE (Cn) 指 定 的 
是 卡通 动作 。 
(4) 卡 通 图 案 一 共有 16 种 ,参见 封底 图 A。 卡 通 图 案 有 时 也 被 称 为 卡通 姿势 。 不 经 定义 的 
卡通 不 可 能 在 程序 中 使 用 。16 种 卡通 (图 案 ) 是 ， 


0: 玛 丽 活 4: 企 鞠 8: 太 空 杀手 卫星 12: 激 光 
1: 丽 莎 5: 火 球 9: 太 空 船 13: 乌 多 
2: 芒 蝇 6: 车 10: 爆 炸 14: 螃 ” 特 
3: 飞 鱼 7: 太 空 站 11: 妖 怪 15 : 鸟 


(5) 卡 通 运动 方向 一 共有 8 个 如 图 4. 6 所 示 。 


图 4.6 卡通 运动 方向 

卡通 运动 方向 按 顺 时 钟 排列 ,向 上 为 方向 1 静止 为 0。 
(6) 运 动 速度 是 指 卡通 在 屏幕 上 的 运动 速度 。 最 快 一 秒 钟 可 运动 60 个 点 (指定 C 王 1) ,' 当 
指定 C=255 时 , 则 255 秒 运 动 60 个 点 。 由 此 类 推 当 指定 C=20 时 , 则 20 秒 运 动 60 个 点 。 
当 屏幕 接点 计算 大 小 时 是 256 个 点 宽 ,240 点 长 。 
7) 位 移 量 是 指 卡通 运动 距离 ,整个 移动 范围 是 2X255 个 点 。 由 于 每 次 移动 两 个 点 , 当 指 
定 D=255 时 ,卡通 可 以 在 屏幕 出 现 两 次 。 
(8) 优 先 度 表示 卡通 是 在 卡通 0 面 还 是 卡通 1 面 上 显示 。 卡 通 0 面 在 背景 面 之 前 ,卡通 1 
面 在 背景 面 后 。 
(9) 配 色 代 码 是 指 在 卡通 面 上 所 使 用 的 代码 。 要 指定 配色 代码 之 前 先 用 CGSET 指令 指定 
板 代码 , 当 用 不 同 的 板 代码 时 ,即使 配色 代码 相同 ,含义 也 完全 不 同 ,请 参看 表 4. 6 和 封 3 
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中 的 内 容 。 
MOVE 
功 能 :使 卡通 开始 运动 。 
格式 :MOVE no[,niynzynsyniyasyneyn7] 
no~ny 是 与 DEF MOYE 指定 的 卡通 动作 代码 (0 一 7) 一 致 。 
缩写 :M. 
解 释 :(1) 首 先 在 执行 了 SPRITE ON 之 后 ,用 MOVE 指令 可 使 在 DEF MOVE 指令 中 所 定义 的 
卡通 开始 运动 。 
(2) 一 执行 MOVE 指令 ,如 果 在 DEF MOVE 指令 所 指定 的 运动 没有 结束 ,即使 程序 执行 
完了 ,卡通 也 会 按 DEF MOVE 指令 中 所 定义 的 位 移 量 , 方 向 .速度 把 动作 做 完 。 
(3) 在 同一 水 平 线 上 可 以 显示 出 4 个 卡通 图 案 。 
CUT 
功 能 :用 MOVE 指令 可 使 卡通 运动 ,而 CUT 指令 则 可 令 运 动 中 的 卡通 停止。 
格式:CUT noC,niynzy,nsyniynsyneyn7] 
缩写 :CU. 
解释:(1) 停 止 卡通 运动 ,执行 下 一 个 MOVE 指令 ,卡通 可 从 被 停止 的 位 置 继续 按 在 DEF 
MOVE 所 定义 的 值 运动 。 
(2)CUT 指令 可 同时 定义 8 个 卡通 停止 。 
《3) 停 止 的 卡通 不 会 消失 。 
程序 售 ， 
CUT 0,1,2 ;直接 键入 指令 执行 
《) 开 
CUT 0,1,2,3,4,5,6,7 
ERA 
功能 :停止 卡通 运动 并 让 被 停止 的 卡通 消失 。 
格 式 :ERA no[C,niynzynsvniynsyneyn7] 
缩写 ;ER. 
解 释 :(1) 用 MOVE 指令 可 让 在 DEF MOVE 所 定义 的 卡通 运动 ,用 CUT 可 让 卡通 停止 。 而 用 
ERA 可 让 运动 或 停止 的 卡通 消失 。 
〈《2) 可 同时 指定 8 个 卡通 。 
(3) 消 失 的 卡通 可 用 MOVE 指令 再 次 起 动 。 卡 通 将 从 消失 的 位 置 出 现 , 并 按 DEF MOVE 
指令 中 的 规定 运动 。 
(4) 再 执行 ERA 之 前 要 先 用 过 MOVE 指令 。 
程序 例 : 10 REM * MOVE * 
20 CLS 
30 SPRITE ON 
40 DEF MOVE(0) 王 SPRITE(0,3,4,255,0,2) 


50 MOVE 0 
RUN ;玛丽 沃 开 始 行走 
ERA 0 ;玛丽 沃 消失 
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MOVE 0 ;玛丽 沃 继续 行走 
POSITION 
功 能 :在 用 MOVE 指令 让 卡通 运动 之 前 ,给 出 卡通 运动 的 初始 座 标 。 
格式 ;POSITION N,X,Y 

N-> 所 定义 卡通 动作 代码 (0 一 7) 

X-> 水 平方 向 座 标 


Y~>~ 垂 直方 向 座 标 
(在 卡通 面 上 X\Y 的 有 效 范围 是 :X:0 一 240*Y :5 一 220) 
缩写 :POS. 
解释;:(1) 给 出 卡通 运动 的 初始 座 标 ,不 指定 时 , 缺 省 值 为 X 王 120,Y 王 120， 


程序 例 ; 
10 REM x* POSITION x* 
20 CLS:SPRITE ON 
30 DEF MOVE(0)=SPRITE(11,3,2,10,1,2) ;定义 卡通 向 右 移动 20 个 点 (2X10) 


40 X 王 RND(256):Y 王 RND(240) ;使 用 随机 函数 产生 任意 的 X,Y 
50 PRINT'X;Y 一 “Xi Y ;打印 出 X,Y 的 值 
60 POSITION 0,X,Y ;指定 卡通 运动 初始 位 置 
70 MOVE 0 ;使 卡通 开始 运动 
80 PAUSE 80 ;暂停 
90 GOTO 20 ;返回 到 20 行 
XPOS 
功 能: 求 出 在 DEF MOVE 所 定义 的 卡通 水 平 位 置 座 标 。 
格 式 :XPOSCn) 
n->DEF MOVE 中 所 定义 卡通 动作 代码 (0 一 7) 
缩 “ 写 :XP. 


解 释 :XPOSCn) 指 令 可 以 测 出 n 卡通 动作 的 X 座 标 值 当 动作 方向 发 生 改 变 时 ,利用 POSITION 
指令 和 XPOS 指令 使 动作 连贯 起 来 。 
程序 例 :参见 程序 3. 7 
YPOS 
功 能: 求 出 在 DEF MOVE 所 定义 卡通 动作 的 垂直 位 置 座 标 ， 
格式 :YPOSCn) 
n-~>DEF MOVE 中 所 定义 卡通 动作 代码 (0 一 7) 。 
缩 ， 写 :YP. 
解释 :YPOSCn) 可 以 测 出 n 卡通 动作 的 立 座 标 值 .利用 POSITION 指令 和 YYPOS 指令 可 使 卡通 
动作 连贯 起 来 。 
程序 例 ， 
参见 程序 3.7 
MOVE(n) 
功能 :用 于 测试 DEF MOVE 所 定义 的 n 卡通 动作 是 否 结束 。 
格 式 :MOVECn) 
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n-~DEF MOVE 所 定义 的 卡通 动作 代码 。 
缩写 :M. Cn) 
解 释 : 当 n 卡 通 开 始 运动 后 动作 未 结束 时 ,MOVE(n) 王 0# 当 动作 结束 后 MOVE(n) 一 一 1。 这 里 
n 为 0 一 7。 
程序 例 ， 
10 REM * MOVEN x* 
20 “SPRITE ON:CGSET 1,0 
30 DEF MOVE(0)=SPRITE(0,3,1,150,0,0); 定 义 0 号 卡通 动作 向 右 移 动 300 个 点 


40 MOVE 0 让 0 号 动作 开始 运动 

50 IF MOVE(0)= 一 1 THEN PRINT“MOVE(0)=”wMOVE(0) :GOTO 50 判 定 动作 是 否 结束 
60 PRINT"MOVE(0)= 汪 MOVE(0) 5 结束 时 打印 MOVE(0) 

70 END 

4.8 ”特殊 功能 指令 

KEY 


功能 :用 于 设 定 功能 键 。 
格式 ;KEY N,“ 字 符 串 ” 
N~>~ 所 设 定 功能 键 的 号 码 (1 一 8) 
字符 串 一 在 功能 键 中 所 设 定 的 内 容 
缩写 :K. 
解 释 : 在 键盘 的 左 侧 有 8 个 功能 键 [Fl | 一 [F8], 这 些 功 能 键 里 的 内 容 可 以 由 用 户 自己 设 定 。 在 出 
厂 时 功能 键 被 预先 设置 了 下 述 功能 。 用 户 可 自行 改变 。 
Fl:LOADCM) 
FE2:PRINT 
FE3:GOTO 
F4:CHR $( 
F5:SPRITE 
FE6:CONT(M) 
F7:LISTCM) 
F8:RUN(CM) 
带 有 (M) 的 指令 表示 不 必 按 回 车 键 直 接 按 该 功能 键 即 可 执行 该 指令 。 
(MD) 可 以 被 设 定 。 设 定 方法 如 下 ; 
KEY N， 字 符 串 ”十 CHR $ (13) 
程序 例 : KEYLIST ;KEYLIST 指令 可 以 用 于 看 功能 键 的 内 容 
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F1 LOAD(M) 
F2 PRINT 

F3 GOTO 

F4 CHRS$( 
F5 SPRITE 
F6 CONT(M) 
F7 LIST(M) 
F8 RUN(M) 
OK 
KEY1,"SVAE" 十 CHR $ (13) ;设置 [Fl | 的 内 容 

OK 

KEY5,"DEF MOVEC ;设置 | F5 | 的 内 容 

OK 

KEYLIST ;用 KEYLIST 列表 ,可 以 看 出 | FI 和 |F5 | 功能 键 


;[EEIT]--[E8] 功 能 键 的 内 容 


的 内 容 
被 改变 了 。 
OK 
Fl1 SAVE(M) 
F2 PRINT 
F3 GOTO 
F4 CHR$( 
F5 DEF MOVE( 
F6 CONT(M) 
F7 LIST(M) 
F8 RUN(CM) 
OK 
KEYLIST 
功能 :把 功能 键 的 内 容 列 表 。 
格 式 ;KEYLIST 
缩写 :K.L. 
解 释 : 一 执行 KEYLIST 指令 ,功能 键 的 内 容 被 显示 在 屏幕 上 . 
PAUSE 
功 能 :暂时 停止 程序 执行 。 
格 式 :PAUSE[n] 
n->0- 一 32767 
缩写 :PA， 
解释 :一 执行 PAUSE 指令 便 按 n 所 规定 的 时 间 和 暂停。 若 省 去 n, 程 序 将 一 直 和 暂停, 按 下 仕 意 一 个 
键 ,程序 才 继 续 执行 。 
程序 例 ; 10 REM x* PAUSE * 
20 FOR I=0TO 10 


30 BEEP:PAUSE 10 
40 NEXT 


50 PAUSE ;程序 在 第 50 行 暂停 ,只 有 接 下 任意 一 个 键 程序 才能 继续 执行 


60 FOR I=0TO 10 
70 PLAY"C":PAUSE 20 
80 NEXT 

SYSTEM 

功 能 :返回 FBASIC 菜单 屏幕 

格式 :SYSTEM 


缩写:S， 

解 释 : 当 由 FBASIC 菜单 屏幕 通过 选择 数字 [| 进入 BASIC 状态 后 ,用 SYSTEM 指令 可 以 返回 
FBASIC 菜单 屏幕 。 

VIEW 

功 能: 调 出 用 BG 绘图 程序 所 写 的 背景 

格 式 :VIEW 

缩写 :V. 


解 释 :(1) 在 BASIC 状态 用 VIEW 指令 可 把 用 BG 绘图 程序 所 写 的 背景 画面 调 到 屏幕 上 .这 时 执 


行 BASIC 程序 不 会 影响 背景 画面 。 
(2)VIEW 指令 一 般 用 在 程序 的 最 前 面 。 

4.9 声音 控制 指令 

BEEP 

功能 :使 喇叭 发 出 “ 吐 ?” 的 一 

格式 :BEEP 

缩写:B. 

PLAY 

功 能 :演奏 音乐 

格 式 :PLAY 音乐 字符 ” 

缩 ” 写 :PL. 


解 释 :根据 “音乐 字符 ”所 指定 的 乐曲 进行 演奏 。.“ 音 乐 字符 ?是 指 :音符 、8 度 音 


和 音色 。 分 别 说 明 如 下 

(1) 拍 节 - 用 T1~T8 指定 拍 节 
Tl( 快 )>T8( 人 慢 ) 

(2) 音 色 -> 用 Y0 一 Y3 指定 音色 
Y0:12.5% ;音色 在 指定 音量 后 指定 
Y1:25% ; 
Y2:50% 
Y3:75 听 

(3) 主 音 
M0-~> 用 V0o~V1S 涯 定 音 量 
0( 小 )< 一 音 是 >18( 大 ) 
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\ 音 量 . 和 音 、 主 音 


M0V15 表示 音量 为 15 

M1-> 用 V0 一 V15 指定 主音 长 民 
MI1V3 表示 音 长 为 3 

8 度 音 -~> 用 O0 一 O5 指定 8 度 音 
O0( 低 音 )<-->O5( 高 音 ) 


(4) 音 符 : 用 下 表 符 号 C~B 表示 : 
表 4.7 音符 的 表示 方法 


(5) 休 止 符 - 用 Ro~R9 指定 休止 长 度 。 
(6) 长 度 -~ 音 符 、 休 止 符 后 附 有 0 一 9 的 整数 来 指定 声音 和 休止 符 的 长 度 。 表 4. 8 表示 了 声音 
长 度 和 数字 的 对 应 关系 。 
4 分 音符 相对 于 数字 5, 可 以 写成 C5R1, 当 不 指定 数字 时 ,后面 的 音 长 与 前 面 一 致 
(7) 和 音 一 演奏 2 重 或 3 重 和 音 时 需 加 冒号 。 比 如 

表 4.8 声音 长 度 与 数字 的 对 应 关系 


声 音 长 度 对 应 的 数字 
土 (32 分 音符 卢 ? 0 
于 (16 分 音符 上 ) 9 | 1 
各 ( 付 16 分 音符 月 | 2 
方 C8 分 音符 v) 7Y 3 
卫 ( 付 8 分 音符 v) Y 4 
1(4 分 音符 4 ) L 5 
1 亏 ( 付 4 分 音符 ,) | 了 | 6 
2(2 分 音符 J) | 时 | 7 
3(( 付 2 分 音符 J) “是 | 8 
4( 全 音符 ) 十- 9 


“系统 1: 系 统 2: 系 统 3:? 各 系统 须 指 定 音 符 ,声音 长 度 . 拍 节 和 音色 等 。 
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(8) 缺 省 值 ~T4.M0.V15.O3`C5、R5 一 经 指定 参数 后 , 若 不 再 指定 ,各 参数 不 变 。 
试 举 一 例 说 明 各 参数 的 含义 ， 
PLAY%T4Y2M0OV103C5R5D5R5E57 


HE 一 
节拍 音色 音量 8 度 音 音符 休止 符 长 度 
详细 的 音乐 设计 法 另 书 说 明 。 
程序 例 ， 
参见 关于 RND 指令 的 说 明 。 
下 面 语 句 可 直接 键入 : 
详细 的 音乐 设计 法 另 书 说 明 。 
程序 例 ， 
参见 关于 RND 指令 的 说 明 。 
下 面 语句 可 直接 键入 : 
参见 关于 RND 指令 的 说 明 。 
下 面 语句 可 直接 键入 ， 
4.10 函数 
函数 分 为 数值 函数 .字符 函数 和 特殊 函数 。 下 面 介 绍 如 下 ， 
4.10.1 数值 函数 
ABS(CX) 
功能 :把 数值 转换 成 绝对 值 。 
格 式 ;ABS(CX) 
缩 ” 写 :AB. 
解 释 :X 的 取 值 范围 是 一 32768 一 十 32767。 经 过 绝对 值 指令 处 理 过 的 数值 均 为 正 数 。 
程序 例 ， 
PRINT ABS(41) 
41 
OK 
PRINT ABS( 一 41) 
41 
OK 
PRINT ABS(10 一 34) 
24 
OK 
SGN 
功 ”能 :用 来 测试 变量 是 正 . 是 负 还 是 零 。 
格式 :SGN(X) 
缩写 :SG. 
解 ” 释 :利用 这 个 符号 函数 ,可 以 测试 变量 变化 的 情况 。 
X>0 ”SGNCX)=1 
X=0 SGN(X)=0 
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程序 例 ， 


RND 


久 <<0 SGN (X) 王 一 


PRINT SGN (41) 

1 

OK 

PRINT SGN (0) 

0 

OK 

PRINT SGN (一 41) 
一 1 

OK 


功 能 :这 个 函数 可 让 计算 机 随机 (任意 ) 地 产生 一 些 数 据 。 


格式: 


RNDCX) 


X-~> 在 (1 一 32767) 范 围 内 选择 


解 ” 释 ;RND 指令 被 称 为 随机 函数 ,意思 是 如 果 给 出 X=100,RND(X) 就 可 在 0 一 32767 的 范围 内 
任意 产生 一 个 数 。 通 常用 来 设计 游戏 中 的 不 固定 目标 ,如 敌 机 、 炸 弹 等 等 。 


程序 例 
10 
20 
30 
40 
50 
60 


70 
80 


利用 这 个 程序 可 以 奏 出 不 固定 乐曲 的 音乐 。 


4. 10. 2 
ASC 


REM * RND * 


“PLAY“M1V6T2Y1?” 


AV$=“CDEFGABR7” 
N 王 RND(8) 


B$=MID$(AS$N 十 1,1) 


PRINT B$， 
PLAY B$ 
GOTO 40 


字符 函数 


; 设 定 音符 7 个 加 一 个 休止 符 。 


;从 AS$ 中 取出 一 个 ,取出 哪 一 个 由 第 40 行 定 .MID 
$ 指令 见 字符 函数 中 MID $ 指令 的 解释 。 


;为 演奏 


功能 :把 字符 转换 成 计算 机 内 部 使 用 的 代码 , 即 ASCII 码 。 
格式:ASC (字符 串 ) 
缩写 :AS. 

解释 :ASCII 代码 是 国标 上 常用 的 一 种 计算 机 内 代码 , 它 是 数字 ,字母 及 常用 符号 的 代码 。 对 于 研 
究 计算 机 内 部 的 人 员 , 机 内 码 会 经 常用 到 。 对 于 学 习 BASIC 语言 的 人 偶而 也 会 磁 到 。 附录 
中 符号 码 B 中 代码 便 是 机 内 代码 。 比 如 下 面 便 是 字符 与 内 码 的 对 应 表 。 


1 


表 4. 9 字符 内 码 的 对 应 


10 REM * ASC x* 
20 INPUT A 刷 ;输入 一 个 字符 
30 A=ASCCASY$) ”把 输入 字符 转 成 机 内 码 
40 PRINT A 岂 3 人 A ;把 字符 和 内 码 打 印 出 来 
50 GOTO 20 

CHR $ 

功 能 ;把 256 个 机 内 码 转换 成 所 代表 的 字符 (图 形 ) 。 

格 式 :CHR$(CX) 


缩写 :CH 

解 释 :CHR$ 的 功能 与 ASC 正好 相反 。 和 :0 一 255。 

程序 例 ， 
10 REM x CHRS$ x 
20 INPUT"0 一 255";A ;输入 一 个 数字 
30 AV$-==CHRS$(CA) ;把 数字 转 成 字符 
40 PRINT Ap AS ;打印 出 来 
50 GOTO 20 

VAL 


. 功 能 :把 字符 型 数据 转换 成 数值 型 数据 。 

格式 :VAL( 字 符 变 量 ) . 

解 释 :(1) 如 果 字 符 串 变量 开头 没有 十 、. 一.& .空格 或 数字 , 则 VAL (字符 变量 ) 为 零 。 
〈2) 可 把 16 进 制 的 数 转 成 10 进 制 。 
(3) 数 字 不 超过 一 32768 一 十 32767。 


.程序 例 : 
10 REM x VAL x 
20 INPUT Ag ;输入 字符 型 数据 
30 A=VALCAS$) ;把 字符 型 数据 变 成 数值 型 
40 PRINT AS$,A ;打印 结果 
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50 GOTO 20 


RUN 
和 ;输入 16 进 制 数 A 
SA 型 ;打印 结果 ,十进制 数 为 10 
0 ;输入 一 A,& 为 十 六 制 数 代号 也 可 写成 <&H” 
-&A 一 10 ;打印 结果 
〈 例 2》 

10 REM x* VAL * 

20 INPUT AS 

30 A=VALCO&H' 二 AS$) 

40 PRINT 人 和 和 人 A 

50 GOTO 20 

STR $ 


功能 :把 数值 型 数据 转 成 字符 型 数据 。 
格 式 :STRS$(CX) 
解 释 : 有 时 需要 把 数值 型 数据 转 成 字符 型 数据 以 便 参加 运算 。 
程序 例 : 
10 REM x* STRS$ x* 
20 _ INPUT A:INPUT B 
30 A$=STRS$(A):B$=STRS$(B) 
40 PRINT AS$ 十 B$ 3 汪 A 十 B 
50 GOTO 20 
运行 上 述 程序 可 以 看 出 ,A$ 十 B$ 与 A 十 B 的 值 是 不 一 样 的 。 尽 管 从 表面 上 看 A$ 等 于 
A,B$ 等 于 B。 但 是 两 者 数据 类 型 完全 不 一 样 。 前 者 是 字符 型 后 是 数值 型 。 字 符 型 数据 求 不 出 代数 
和 。 
HEX9$ 
功 能 :把 10 进 制 数 转 变 成 16 进 制 数 。 
格 式 ;HEXSY$(CX) 
X-~> 在 一 32768 一 十 32767 范围 内 取 值 。 
程序 例 : 
10 REM x* HEX$ * 
20 FOR I=0TO 20 
30 PRINT'&H"HEX$ (D) 一 
40 NEXT 
这 个 程序 把 0 一 20 的 10 进 制 数 与 16 进 制 数 进 行 了 比较 。 
LEFTS$ 
功能 ;从 字符 串 左 侧 取出 字符 。 
格 式 :LEFT$ (字符 串 ,n) 
字符 串 一 最 多 31 个 字符 。 
n- 表 示 从 左边 取出 的 字符 数 
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解 释 :LEFT$ 的 取 字 符 方向 与 RIGHT $ 相反 。 
程序 例 ， 
10 REM * LEFTS$ * 
20 A$="ABCDE” 
30 FOR I=1TO 5 
40 PRINT LEFTS$(AS$ ,IT) 从 左 侧 取 字 符 
50 NEXT 
RUN 5 下面 是 运行 结果 


ABCD 
ABCDE 

OK 

把 40 行 换 成 ， 

40 PRINT LEFT$ ("ABCDE?”,T) 
并 删 掉 20 行 , 即 

20》 
运行 后 可 得 同样 结果 。 

RIGHT$ 

功能 :从 字符 串 右 侧 取出 字符 。 

格 式 ;:RIGHT $ (字符 串 ,n) 
字符 串 一 最 多 31 个 字符 。 
n~ 表 示 取 出 的 字符 数 。 

缩写 :RLI. 

解 ” 释 :用 法 与 LEFT$ 相 对 

程序 例 ， 

10 REM x* RIGHTS$ * 

20 A$="ABCDE" 

30 FOR I=1TO 5 

40 PRINT RIGHTS$(CAS$ ,IT) 
50 NEXT 

RUN 


MID 9$ 
120 


功 能 :取出 字符 串 中 任意 字符 和 取出 多 个 字符 。 
格 式 :MID$ (字符 串 , 开 始 位 置 ,n) 
字符 串 一 最 多 31 个 
开始 位 置 -从 左 侧 开始 计算 从 第 几 个 字符 开始 取 。 
n~ 取 出 的 字符 数 。 
缩 “ 写 :MIL. 
解释 :MID$ 指 令 可 以 从 中 间 ,左边 ,右边 任意 取 字 符 。 
程序 例 ， 
10 REM x* MIDS$ x* 
20 A$="ABCD" 
30 FOR I=1TO4 
40 PRINT MID $(A$ ,I,1) 
50 NEXT 
RUN ;下面 是 执行 结果 
.人 
B 
C 
D 
OK 
LEN 
功 ”能 :用 于 求 字符 串 的 长 度 。 
格式;LEN( 字 符 串 ) 
缩 写 :LE， 
解 释 : 在 计算 字符 串 长 度 时 ,空格 和 非 印 刷 字 符 也 计算 在 内 ,长度 为 0 一 31。 
程序 例 ， 
10 REM * LEN =* 
20 FOR I=1TO 28 
30 AS$=A" 十 A$ 
40 L=LENCA$) 
50 PRINT AS$ 
60 NEXT 
70 PRINT L 
INKEY$ 
功能 :检测 键盘 输入 。 
(ny) 
格 式 :INKEYS$ | 
缩写 :INK 
解 释 :(1) 从 键盘 读 入 一 个 字符 。 当 n=0, 程 序 在 有 INKEY $ 指令 的 行 停止 ,直到 输入 了 一 个 字 
符 后 才 接 着 运行 程序 ,n 常 取 零 。 


(2) 当 nm 被 忽略 ,程序 不 会 停 。 当 有 键 按 下 时 ,该 字符 便 成 为 INKEY$ 的 值 。 
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程序 例 :(1》 
10 REM x* INKEYS$(0) * ; 
20 A$=INKEY $ (0) ;没有 键 按 下 程序 停 在 这 一 行 
30 IF A$=?"ATHNE PRINT ASY$ 
40 BEEP:GOTO 20 ; 若 所 按 的 不 是 A, 发 出 咬 的 声 跳 回 20 行 
(2》 
10 REM x INKEY $ x 
20 Ad$=INKEY 4$ ;没有 键 按 下 程序 在 这 一 行 不 停 
30 IF A$ =“ATHNE PRINT AS$ 
40 BEEP:GOTO 20 ;没有 键 按 下 或 所 按 的 不 是 A ,将 不 断 发 出 咬 声 
4.10.3 ”特殊 函数 
POS 
功能 :给 出 光标 当前 的 列 数 , 即 水 平方 向 的 变化 。 
格式:POS(0) 
解 ” 释 :水 平方 向 的 变化 即 X 方向 的 变化 ,左边 的 X 座 标 为 0, 右 边 为 25。 
程序 例 ;10 REM x* POS * 
20  CLS 
30 FOR X=-0TO 25 
40 LOCATE X,0 
50 PRINT POS(0) 
60 PAUSE 10 
70 NEXT 
FRE 、 
功 能 :看 内 存 剩 余 空 间 。 
格 式 ;FRE 
缩写 :FR. 
解释: 利用 FRE 指令 可 以 了 解 内 存 空间 的 剩余 。 
程序 例 ;PRINT FRE 
4030 ;这 时 内 存 还 有 4030 个 单元 可 以 使 用 。 
STICK 
功 能 :用 来 检测 操纵 器 十 字形 方向 键 的 上 下 左右 。 
格 式 :STICK(X) ”X-~> 取 01, 表示 是 1 号 还 是 2 号 操纵 器 。 
缩写 :STI 
解 ” 释 :十 字形 方向 键 的 不 同方 向 用 不 同 数 值 代表 。 即 


上 下 左右 各 有 一 个 数值 , 按 的 方向 不 同 ,STICK 函数 的 值 也 不 同 。 
122 


程序 例 ;10 REM x* STICK x 
20 S=STICK (0) 
30 IF S=0THEN PRINTS 王 0" 
40 IF S=1THEN PRINT'S 王 1 
50 IF S=2THEN PRINT'S 王 27 
60 JIF S-=4THEN PRINTS 一 业 
70 IF S=8THEN PRINTS 一 8 
80 GOTO 20 
只 要 用 1 号 操纵 器 便 可 以 不 断 打 印 出 字符 。 
从 程序 上 还 可 以 看 出 ,假如 有 两 个 键 同时 按 下 时 ,将 不 打印 结果 ,这 时 屏幕 内 容 训 不 再 滚动 ， 
STRIG 
功能 :用 于 测试 操纵 器 4 个 按钮 是 否 被 按 下 。 
格 式 :STRIG(X) ” X-> 取 0, 或 1, 表 示 是 1 号 还 是 2 号 操纵 器 。 
缩写 :STR. 
解释 :操纵 器 4 个 按钮 的 对 应 的 数值 为 


这 个 数 便 是 STRIG(X) 函 数 的 值 。 
程序 例 ;10 REM x* STRIG x* 
20 T=STRIG(0) 
30 IF=1THEN PRINTSTART” 
40 IF=2THEN PRINT'SELECTY 
50 JIF=4THEN PRINT'%B” 
60 IF=8THEN PRINTYAY 
70 GOTO 20 
CSRLIN 
功 能 :给 出 光标 的 所 在 行 ,上 
格式:CSRLIN 
绾 ” 写 :CSR. 
解 ” 释 :光标 垂直 变化 用 CSRLN 测试 ,水 平 变化 由 POS(0)? 测 试 , 两 者 合 起 来 可 以 定 出 平面 座 标 。 
程序 例 :10 REM * CSRLIN x 
20 CLS 
30 FOR I=0TO 20 
40 LOCATE II 
50 PRINT POS(0);",”%5CSRLIN 
60 PAUSE 20 


70 NEXT 
上 述 程序 将 在 屏幕 上 沿 45" 角 显 示 数 字 。 

SCR $ 
功 能 : 求 出 背景 面 中 所 显示 的 字符 和 图 形 。 
格 式 ;SCR$(X,Y,Sw) 

X-~~ 横 座 标 (0 一 27) 

Y-> 纵 座 标 (0 一 23) 

Sw-~> 求 出 配色 代码 (0~1),0 可 以 省 略 。 
缩写 :SC， 
解释 :指定 背景 画面 上 的 行 和 列 , 可 以 了 解 指 定位 置 的 字符 或 图 形 是 什么 .Sw 为 1 时 可 以 求 出 图 

形 的 配色 代码 (0 一 3)。 


程序 例 : 
10 CLS 
20 LOCATE 0,10 ;第 20 行 指定 屏幕 位 置 
30 PRINTAMILY 一 COMPUTER” 
40 PRINT 在 屏幕 上 打印 一 些 字符 ， 
50 LOCATE 10,15 ;指定 位 置 


60 PRINT SCR $ (0,10) 
70 A$=SCRS$(1,10) 
80 PRINT AS$ ; 
90 C$=SCRS$(1,10,1) 
100 PRINTCOLOR=":ASC(C$) 60 一 100 行 取 出 字符 
1t0END 
4.11 控制 卡通 面 指令 
控制 卡通 面 指令 一 共有 4 个 ,是 FBASIC 的 特点 之 一 ,下 面 分 别 叙述 。 
DEF SPRITE 
功 能 :定义 在 卡通 面 显示 的 卡通 姿势 。 
格 式 :DEF SPRITE A,(B,C,D,E,F) 王 字符 串 。 
A~> 卡 通 姿 势 代 码 0 一 7 
B-> 配 色 代 码 0 一 3( 见 封 3 图 B) 
C~~ 图 形 大 小 0 一 1(0 表示 图 形 为 8X8 点 阵 组 成 , 即 一 个 字符 大 小 ;1 表示 图 形 为 16X16 
点 阵 组 成 , 即 4 个 字符 大 小 。) 
D-~~ 优 先 度 0 一 1(0 表示 利用 卡通 0 面 , 即 在 背景 面 之 前 ;1 表示 利用 卡通 1 面 , 即 在 背景 面 
之 后 。) 
E-*X 方向 反 转 0~1(0 表示 与 封底 图 A 图 形 相 同 ,1 表示 图 形 发 生 左右 反 转 。) 
F-Y 方向 反 转 0 一 1(0 表示 与 封底 图 A 图 形 相 同 ,1 表示 图 形 发 生 上 下 反 转 。) 
缩 “ 写 :DE. SP. 
解 释 :在 指定 图 形 大 小 时 可 以 指定 两 种 大 小 ( 见 下 页 ) 。 关 于 卡通 面 的 叙述 参见 3. 1 节 。 
艾 4.7(Ca) 和 (b) 是 在 X 方 向 的 反 转 图 形 。 
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4 个 字符 大 小 
一 个 字符 大 小 


项 


8X8 点 


36X16 点 


图 4.7 

用 CGEN 指令 进行 设 定 ,可 以 把 符号 .字母 用 在 DEF SPRITE 指令 ,其 中 字符 让 指 令 CHR $ (N) 
中 的 N* 可 以 使 用 符号 图 表 B 中 的 代码 。 
程序 例 ,10 REM * DEF SPRITE x* 

20 SPRITE ON 

30 DEF SPRITE 0,(0,1,0,0,0) 一 CHR $ (0) 十 CHRS$ CD) 二 CHRS$(2) 十 CHRS$ (3) 

40 SPRITE 0,100,130 

程序 CHR $ (N) 中 的 0,1,2,3 分 别 对 应 图 4. 7(a)4 角 所 称 的 号 码 , 也 对 应 符号 图 表 A 中 的 玛 

丽 沃 的 代码 。 
SPRITE 
功 能 :将 由 DEF SPRITE 所 定义 的 卡通 姿势 在 屏幕 任意 位 置 上 显示 或 消除 。 
格 式 ;SPRITEn[,X,Y] 

n~ 卡 通 姿势 代码 0 一 7。 

X-~>~ 卡 通 面 横 座 标 0 一 240。 

Y- 卡 通 面 纵 座 标 5 一 220 


缩 ” 写 :SP. 
解 释 ;(1) 当 省 略 X,Y 座 标 , 则 会 在 屏幕 上 清除 n 号 卡通 。 指 令 格式 为 : 
SPRITE n 
n 一 卡通 姿势 代码 0 一 ?7 
(2) 在 同一 座 标 上 显示 多 个 卡通 时 《发 生 卡通 重 琶 时 ) ,代码 小 的 能 被 看 到 (在 最 前 面 ) 。 
(3) 在 同一 水 平 只 能 显示 4 个 卡通 。 
《4) 背 景 面 和 卡通 面 座 标 不 同 , 座 标 之 间 的 关系 为 : 
x= 一 (XXX8) 十 16 
y= 一 (YX8) 十 24 
其 中 :x,y 是 卡通 面 座 标 。 
X,Y 是 背景 面 座 标 。 
对 于 背景 面 和 卡通 面 的 详细 讨论 请 参见 3.1 节 .3.2 节 和 3.11 节 。 
SPRITE ON 
功能 :打开 卡通 面 。 
格式 ;SPRITE ON 
缩写:SP.O. 
解 各 : 在 执行 DEF SPRITE 或 DEF MOVE 指令 之 前 ,卡通 面 必 须 先 打开 。 卡通 面 一 旦 被 打开 只 
.要 不 执行 SPRITE OFF 就 将 一 直 打 开 。 
SPRITE OFF 
功能 :关闭 卡通 面 。 
格 式 :SPRITE OFF 
缩写 :SP.OF， 
解 释 ::1 关 闭 卡通 面 ,所 有 卡通 将 消失 。 
(2) 使 卡通 面 无 法 重 到 在 背景 面 上 。 
。， MOVE 系列 指令 与 SPRITE 系列 指令 比较 
控制 卡通 运动 的 指令 是 FBASIC 的 特点 ,控制 卡通 运动 的 指令 一 共有 两 套 , 即 MOVE 系列 与 
SPRITE 系列 。 从 使 用 的 方便 程度 上 ,MOVE 系列 要 方便 一 些 。 因 为 MOVE 系列 是 用 于 控制 “ 动 
作 ” 的 ,而 SPRITE 系列 是 用 于 控制 “姿势 ”的 ” 
在 控制 卡通 方向 上 ,SPRITE 系列 也 是 无 能 为 力 而 MOVE 系列 可 以 定义 8 个 方向 的 运动 。 
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五 、 程 序 实 例 及 说 明 


下 述 的 BASIC 程序 充分 发 挥 了 FBASIC 的 特长 ,通过 下 面 的 程序 例子 ,读者 会 对 每 个 指令 的 
含义 和 它们 在 程序 中 的 作用 有 更 深 的 体会 。 
5.1 学 习 程 序 实例 的 注意 事项 

对 于 本 章 给 出 的 游戏 例 颌 ,在 输入 和 修改 时 应 该 注意 下 述 几 点 : 

全 输入 程序 时 的 注意 事项 

(1) 输入 程序 时 ,应 正确 地 输入 行 号 和 语句 ,并 符合 语法 规则 。 如 下 例 ， 

5 _CLS 

10 SPRITE ON 

20 CGSET 1,1 

30 FOR N=0TO7 

40 DEF MOVE(N)=SPRITE(0,N 十 1,3,255,0,0) 

50 NEXT 

60 MOVE 0,1,2,3,4,5,6,7 

70 GOTO 60 

80 END 

当 每 一 行 语句 较 长 ,屏幕 的 一 行 显示 不 下 时 ,继续 输入 时 自动 换行 显示 。 

(2) 输入 时 应 按 程序 清单 输入 ,在 GOTO,GOSUB 或 IF 一 THEN 后 的 行 号 可 以 不 加 空格 ， 
如 :GOTO0120 

(3) 有 时 会 发 生 内 存 不 够 用 的 情况 ,这 时 出 现 内 存 溢出 错误 。 

全 程序 修改 或 变更 时 的 注意 事项 

(1) BASIC 程序 的 编制 ,变更 或 修改 必须 在 消除 BG GRAPHIC( 背 景 ) 画 面 后 进行 。 如 果 保 
留 背景 画面 进行 程序 变更 或 修改 ,会 产生 错误 的 结果 。 

(2) 要 消去 背景 面 ,只 需 按 [HOME | 键 ,光标 便 回 到 左上 角 。 

(3) 用 LIST 指令 调 出 程序 ,进行 修改 或 更 正 。 

总 之 ,编制 并 运行 游戏 程序 的 整个 过 程 是 :首先 用 BG GRAPHIC 指令 把 背景 面 设 计 好 ,其 次 
消去 背景 面 , 用 BASIC 编制 控制 卡通 运动 的 程序 并 调试 好 。 最 后 在 程序 开始 时 ,用 VIEW 指令 调 
出 背景 。 这 样 ,一 个 完整 的 游戏 程序 就 完成 了 。 

全 背景 面 的 图 案 

书后 封 三 图 表 B 中 的 图 案 , 即 为 设计 背景 用 的 图 案 , 如 图 5. 1 所 示 。 

它们 共 分 为 13 组 (从 A 一 M) ,每 组 有 8 个 图 案 (0 一 7), 全 部 存 于 机 器 的 内 存 当 中 ,用 时 调 出 即 


BG 绘图 程序 在 横 28 个 字义 纵 21 行 的 范围 内 可 绘制 背景 。 
下 面 是 一 个 背景 设计 的 例子 
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其 中 :;K50 意味 着 使 用 图 表 B 中 开 组 的 第 5 号 图 形 , 配 色 代码 为 0。 
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B73 意味 着 使 用 图 表 B 组 的 第 7 号 图 形 ,配色 代码 为 3。 
.上 述 K50、B73 等 图 表 对 应 于 封 3 图 表 B 中 的 图 形 ,可 在 SELECT 状态 (BG 程序 中 ) 下 ， 


态 下 ,可 以 直接 输入 字符 


输入 与 K50、B73 对 应 的 图 形 。 在 背景 设计 中 ,BG 绘图 程序 的 CHAR 状 


上 面 的 背景 设计 对 应 着 下 面 的 图 5. 2。 


5.2 程序 实例 


程序 例 1 :跳马 
程序 清单 


10 VIEW:CGEN 3:CGSET 1,1 


CHR $ (&HC7) 


20 DEF SPRITE 0,(0,0,0,0,0) 


30 PALETS 0,13,&H16,&H27,2 
40 DEF SPRITE 2,(0,0,0,0,0) 


50 DEF SPRITE 1 


CHR $ (&HD7) 
CHR $ (&HC7) 


0) 一 


0 


汪 


0 


9》 


0 


(0， 


9》 


60 PALETS 1,13,&KH16,&H17,4 
70 DEF SPRITE 3,(1,0,0,0,0) 


80 SPRITE ON 


CHR $ (&HD7) 
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130 


90 DIM HRX(GI),HYCL) 


100 


TI10 
120 


130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 


DIM X(7),Y(7),B(7,7) 
X(C0)= 一 1:Y(0) 一 一 2 

XGOD 一 一 2:Y(D) 王 一 1 

X(2) 一 一 2:Y(2) 王 一 1 

X(3) 王 一 1;Y(3) 一 2 

X(4) 王 1:Y(4) 一 2 

X(5)= 一 2:Y(5) 一 1 

X(6)=2:Y(6) 一 一 1 

X(7)=1:Y(7) 一 一 2 

C=0:GOSUB 250 

C=1;:GOSUB 250 

C=1 十 (C 一 31》 

GOSUB 390 

IFEF 王 一 1 THEN 560 

GOTO 210 

X==0:Y 一 0:F==0 

GOSUB 440 

IF F=1THEN PLAY“T103C2”:F 王 0:GOTO 260 
IF T 一 8THEN RETURN 

IF S=4THEN Y=Y 二 1:IFY>7THEN Y=?7 
IF S=8 THEN Y=Y 一 1;IF Y<OTHENY=0 
X 王 X 二 (CS=1) 一 (S 王 2) 

X 一 一 Xx (X>0) 十 (X>7) 

GOTO 260 

GOSUB 440:F 王 0 

IFT=8THEN RETURN 

IF S=0THEN S=4 

IF S=8 THEN N=N 一 1:IF N<OTHEN N=7 
IF S=4THEN N==N+1l:IFN>7THEN N=0 
X=-HXCC) 二 XIN):Y 王 HYCC)-HYCN) 
F==F 二 1:IFEF>8THENF= 一 1:RETURN 

IF X<0 OR X>7 OR Y<0OR Y>7THEN 360 
IF B(X,Y)=1THEN 360 

GOTO 340 

SPRITE C,136 一 16x*X,16x*Y 十 47 
T=STRIG(C):S=STICKCC) 

IF (S$+T)=0THEN 450 

IFE T<>>8 THEN 540 

IF BCX,Y)=1THEN F=1;:RETURN 


Y) 王 1 
又 : 


500 HX(C) 


9 


490 了 B(X 


一 立 


HY(C) 


510 SPRITE C 十 2,136 一 HXCC)* 16,16x*HYCC)? 十 47 


520 LOCATE 15 一 2* HX(CC),3 十 2x* HY(CC) 


530 PRINT“x 交 


:PLAY“T1O3CDEG?” 


540 SPRITE C 
550 _ RETURN 


560 END ROUTINE 


,20:PLAY“T103CDET2 O4EGAC” 


570 LOCATE 3 
1 THEN PRINT“BLUE”; 
0 THEN PRINT“RED?， 
600 PRINT“WINI!7:END 


580 IF C 
590 JE C 
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《跳马 》 


将 棋子 放 入 棋盘 ,以 跳棋 方式 移动 , 先 不 能 移动 者 为 失败 。 


《游戏 方法 
2 人 对 战 , 用 十 字 键 改变 移动 场所 ,场所 定 了 ,用 A 钮 来 定位 。 
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程序 例 1 分 析 ， 

本 程序 是 在 棋盘 中 进行 跳马 。 两 人 对 玩 , 最 终 无 路 可 走 者 为 输 。 

根据 路 马 的 规则 ,模子 的 每 一 步 最 多 有 8 个 位 置 可 走 , 如 右 图 所 示 用 S1 一 S8 表示 .这 8 个 位 置 
相对 于 棋子 所 在 位 置 的 座 标 分 别 为 Si 一 1, 一 2),S2( 一 2, 一 D),S3( 一 2,1),S4( 一 1,2),S5(1,2)， 
S6(2,1),S7(2, 一 1),S8(1, 一 公 。 本 程序 第 100 语句 至 第 .180 语句 中 定义 的 X 数组 和 了 数组 配对 
用 来 表示 这 8 个 相对 位 置 座 标 。 
“ 男 外 ,如 果 某 一 位 置 已 有 棋子 走 过 , 则 在 该 位 置 上 显示 一 个 “ * ”符号 ,以 后 程序 可 自动 识别 ,此 
位 置 双方 都 不 可 再 走 。 第 100 语句 中 定义 的 B 数组 用 来 记忆 某 一 位 置 是 否 走 过 , 如 果 BCn,n) 一 1 
(a 代表 X,Y 座 标 ,其 值 为 0 一 7) 则 表示 该 位 置 已 走 过 ; 如 果 BCn,n)=0, 则 表示 该 位 置 未 走 过 , 可 . 
以 走 。 

本 程序 用 小 旗子 作为 标志 ,指示 棋子 可 以 走 的 位 置 , 如 果 按 操纵 器 十 字 按钮 的 上 方位 时 , 则 转 
绕 棋 子 顺 时 针 方向 用 小 旗子 指示 棋子 可 以 走 的 位 置 S1 一 S8, 已 走 过 棋 了 的 地 方 , 即 显示 有 “* ”的 
位 置 会 自动 跳 过 ,每 按 一 次 ,移动 一 次 .如 果 按 十 字 按 钮 的 下 方 记 时 , 则 反 过 来 送 时 针 方向 用 小 旗子 
指示 棋子 可 走 的 位 置 。A 按钮 是 定位 按钮 , 当 用 十 字 按钮 选 定 了 要 走 的 位 置 后 , 按 一 个 A 按钮 , 棋 
子 就 会 移动 到 小 旗子 所 指示 的 位 置 ,原来 棋子 所 在 位 置 显示 “ * ”标记 。 然 后 小 旗子 会 移动 到 对 方 棋 
子 周 例 S1--S8 位 置 中 的 某 一 个 ,由 对 手 用 另 一 个 操纵 器 控制 走 棋 。 

王 面 进行 程序 分 析 

程序 的 第 20 一 70 语句 定义 棋子 .小 旗子 和 它们 的 颜色 。 棋 子 有 两 种 颜色 ,小 旗 小 也 有 两 种 颜 
色 ,游戏 的 双方 使 用 不 同 的 棋子 和 小 旗子 。 5 

开 棋 时 ,小 旗子 出 现在 棋盘 的 右上 和 角 , 游 戏 者 通过 按 操 纵 器 十 字 按 钮 的 上 .下 \ 左 , 右 方位 来 分 
- 出 控制 小 旗子 上 、 下 , 左 、 右 移动 ,每 按 一 次 , 则 在 该 方位 上 移动 一 格 , 以 此 来 选择 棋子 的 落 位 ,此 时 ， 
若 按 下 A 按钮 ,在 所 选 定 的 位 置 上 就 会 出 现 棋 子 , 小 棋 了 回 到 棋盘 右上 角 的 位 置 ,由 游戏 的 对 方 来 
选择 第 一 步 棋子 的 落 位 。 这 个 功能 是 由 程序 的 第 190 语句 ,第 200 语句 ,以 第 250 语句 开头 的 子 程 
序 和 以 第 440 语句 开头 的 子 程序 共同 完成 的 。 

首先 介绍 一 下 以 440 语句 开始 的 子 程序 ,这 个 子 程序 主要 完成 定位 功能 。 

在 本 程序 中 ,调用 这 个 子 程序 时 C 总 是 等 于 0 或 1, 所 以 440 语句 的 功能 就 是 使 小 旗子 根据 
X,Y 的 值 出 现在 屏幕 上 ,第 450 语句 从 操纵 器 上 得 到 方向 值 和 按钮 值 (参见 STRIG 指令 和 STICK 
指令 ), 如 果 按 钮 A 按 下 , 则 令 B(X,Y)=1, 记 下 此 位 置 已 有 棋子 走 过 ,然后 在 第 510 语句 让 棋子 移 
动 到 新 的 位 置 ,第 520 一 530 语句 在 棋子 的 位 置 上 显示 “* ”标记 。 

第 250 语句 开头 的 子 程序 是 根据 从 操纵 器 上 得 到 的 方向 值 和 按钮 值 ,来 改变 小 旗子 的 X,Y 应 
标 。 

这 样 第 190 语句 通过 调用 250 语句 开头 的 子 程序 (在 第 250 语句 开头 的 子 程序 中 ,又 多 次 调用 
440 语句 开头 的 子 程序 ) 控 制 了 游戏 的 一 方 第 一 步 棋 的 定位 。 第 200 语句 同样 道理 控制 游戏 的 另 一 
方 第 一 步 棋 的 定位 。 汪汪 

在 游戏 双方 第 一 步 棋 走 过 之 后 ,游戏 将 按照 前 面 所 令 述 的 规则 进行 , 即 由 程序 控制 自动 地 用 小 
旗子 提示 可 世 走 的 位 置 ,游戏 者 通过 按 十 字 按钮 的 上 .下 方位 键 来 选择 ,用 A 按钮 定位 ,双方 轮换 
走 横 。 这 个 功能 是 出 程序 的 第 210 一 240 语句 .340 一 430 语句 和 以 440 语句 开头 的 子 程序 完成 的 。 

程序 的 第 210 语句 一 240 语句 轮换 地 使 C 变量 等 于 0 或 等 于 1, 用 来 控制 是 A 选手 走 棋 还 是 3 
选手 走 棋 。 在 这 段 程序 中 调用 390 语句 的 子 程序 。 

第 390 语句 开始 的 子 程序 就 是 控制 按照 跳马 的 规则 ,自动 选择 S1 一 S8 位 置 的 。X(7)、Y(7) 数 
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组 配对 ( 即 X(C0)%Y(0)y、CX(1),Y(1))……) 表 示 S1 一 S8 位 置 相 对 于 棋子 位 置 的 凑 标 ,第 390 语 
句 即 保证 了 小 棋子 的 位 置 (X,Y) 只 能 在 棋子 (HX(C),HY(C) 周 围 的 SI-S8 的 个 位 置 内 选择 ,第 
360 一 380 语 甸 根 据 估 十 字 按 钮 输入 的 方向 值 , 控 制 顺 时 针 方 向 或 逆 时 针 方向 来 选择 。 第 400 语 名 
用 下 变量 作为 计数 器 ,如 果 S1 一 S8 的 8 个 位 置 都 已 有 棋子 走 过 , 则 令 下 三 一 1, 众 子 程序 返回 。 在 第 
230 语句 中 判断 若 下 = 一 1 则 游戏 结束 , 跳 转 到 第 560 语句 在 屏幕 上 显示 “BLUE WIN7”( 兰 胜 ) 或 
“RED WIN7”( 红 胜 ) 守 样 。 
程序 例 2 ,非凡 的 记忆 力 
程序 清单 ， 
10 WIEW:CGEN 2 
20 MAX=5:I=Z:X=Y:C=0 
30 PP$ 王 “CFGE?” 
40 Z$=CHRS$(254):Z$ 一 Z$ 十 2$ 十 Z2$ 十 Z$ 十 Z$ 
;50 NS 一 多 
60 DIM PLIMAX),PX(3),PY(3),C(3) 
70 PX(0)=16:PY(0)=8:C(0) 一 2 
80 PX(1)=0:PY(1) 一 8:CC1) 一 4 
90 PX(2) 一 8:PY(2) 一 0:C(2) 一 6 
100 PX(3)=8:PY(3) 王 16:C(3) 一 8 
110 ， 
120 PL(Z)=RND(4) 
130 FOR I=0TO2Z 
140 X=PX(PLGD):Y=PYCPLCOD) 
150 C=CCPL(I)) 
160 PALETB 0,13,13,13,13 
170 GOSUB 440 
180 PLAY“T204? 二 MID$ (PP$ ,PLGD 十 1,1) 十 “3? 
190 GOSUB 500 
200 PALETB 0,13,&H16,&KH27,2 
210 PAUSE 10 
220 NEXT 
230 
240 I=0 
250 LOCATE 9,10:PRINT“YOU” 
260 A$ =INKEY$ :IFAS$=“” ”THEN 260 
270 IFAS$<CHRd$ (28) OR A$>CHRS$(3i) THEN PLAY“T1O1C1C1C1”:GOTO260 
280 IF(ASC(A$ ) 一 28)<>PLGIDTHEN PLAY%T205C2R2F2R2E2":LOCATE 9,10:PRINT? 
”GOTO 130 
290 PALETB 0,13,13,13,13 
300 X=PX(CPL(GD)):Y=PYCPL(D) 
310 “C=CCOPLCD) 
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320 .GOSUB 440 

330 ， PLAY"T204" 十 MID$ CPP$,PLGD 十 1,1) 十 ”37 
340 GOSUB 500 

350 PALETB 0,13,&H16,&H27，,2 
360 II=I 十 1:IF I<=ZTHEN 250 
370 2Z=Z 十 1:IF Z>>MAX THEN410 
380 LOCATE 9,10:PRINT” 吕 
390 PAUSE 50 

400 GOTO 110 

410 “END 

420 CLS:CGSET 1,1:PRINT'GOODI! 
430 END 

440 FOR J 一 0TO 5 

450 LOCATE X,Y 十 ] 

460 PRINT 2Z$ 

470 ， NEXT 

480 PALETB 0,13,C,C,C 

490 人 RETURN 

500  PALETB 0,13,13,13,13 

510 FOR J=0TO 5 

520 LOCATE X,Y 十 J 

530 PRINT NS$ 


540 NEXT 

背景 

0 1 2 3 生 5 6 7 8 9 10 1 12 1 1 1 1 17 118 19 20 21 22 23 玫 4 26- 36 27 
更 凡响 本 而 中 病 轴 本 抽 苹 可 其 遇 下 用 本 用 本 再 配 力 证 驻 盾 关 芭 到 磺 昌 医 划 主要 桥 轴 逢 双 情 交 说 本 卫 芭 | 囊 
[Kez[kez| | | | | | | jgsz|gez|kez| | | | |i6o|Jso|J3o|J3o|J3o|]3o| io 
| [kezjksz|k6z| | | | | | | ksz|kezlksz| | | | |Jzols|ulP|ETR|To| 
[| | kszjkszlkezj| | | | | | | gsz|kszlkez| | | | zolME MoR|Y 
[Ksz[Ksz|Ksz|L2z|KezlKez| | | | | | | |Ksz|K6z|Ll12|K52|K52|Ks2| |Too | Jao |J30|J30|J30 |30 |Jzo | 
5 [jgsz|ksz|Ksz|Ksz|Lzzj|kez| | | | | | | |ksz|Llzjksz|ksz|ksz|ks 下 | | | | | | | 
56 [|Ksz|Ksz|Ksz|Ksz[ksz|rzz| | | | | | | [Liz|gszjksz|kszjksz|k5 引 | | | | | | 
本 本 国 量 起 量 加配 双 而 下 本 双 本 四 柄 旺 王 本 机 避 笑 和 硕 革 医大 厦 明 吨 芍 闻 二 大 玫 天 双 两 司 计 辐 古本 古 到 夯 曙 医 贡 国友 国 国 
3 吓 明 大 攻 区 果 障 交际 到 天 耐克 蕊 攻 略 画 男 醒 友 琴瑟 机 页 五 量 区 旺 也 曙 卫 世 夸 澳 吴 而 床 尖 本 丰 部 而 区 避 丙 双 本 和 陆 得 中 区 天 四 吨 引 
| 
| 
1 六 | | | | | | | cazkszkszksr | | | 
语 到 项 辣 芒 夯 硬 吉庆 到 而 司 本 本 随 滞 顺 厂 下 观 证 可 觅 大 区 落 榴 王 硬 贡 东 明天 这 要 区 攻 而 马 轴 是 胀 要 铬 四 是 允 同 昌 县 台 本 大 基 可 
| 人 攻 三 | 全 | 
上 国 二 医 困 本 王 醒 双 三 而 攻 看 政 天 项 巴 隐 本 唤 双 而 辣 而 可 醒 一 醒 电 民 委 及 芭 要 轴 攻 区 肌 攻 有 栅 疝 且 码 本 末 区 项 本 于 西 芝 天 臣下 
15 | |Ksz|Ksz|Ksz|Ksz|Kszltog| | | | | | | kzz|gsz|ksz|kszjkszjks | | | | | | | 
16 | |Ks2|Ks2|K52|K52|Loz|k6z| | |] | | | | |K6z|K72|Ksz|ksz|kszlks 下 | | | -| | | | 
17 [ |Ksz|Ksz|Ksz|Loz|Kezjkez| | |、， | | | | |Ksz|K6z|k72jK5z|ks2jxsz| | | | | | | | 
18|[ | | | jxkez|kszlkez ] 寺 | | | | kszkszke | | | | | 
| | | | jgszlkezlkizl| | | | | | | kszkszlktzl | | | | | 
2 人 | | | jezlkezlkezl| | | | | | | jxezlkezlkezl | L |L |] | L | 1L 1LL 

“非凡 的 记忆 力 》 

计算 机 可 以 测验 你 的 记忆 力 ， 看 你 是 否 记得 住 彩色 绘图 板 上 、 下 、 左 、 右 闪 动 的 次 序 。 
(游戏 方法 


1 人 玩 。 首 先 ， 彩 色 画 板 会 在 上 下 左右 4 个 方向 任意 闪烁 ， 请 记 住 顺序 。 画 面 中 央 若 出 现 
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“YOU” 的话, 则 以 相同 的 顺序 按 指示 键 。 画面 的 上 下 左右 各 对 应 [二 |->j[][Ly], 若 中 途 发 生 错误 ， 
电脑 将 重 来 ， 再 一 次 以 相同 的 顺序 闪烁 。 在 程序 的 20 行 处 决定 闪烁 次 数 的 最 大 值 ， 若 值 增 大 ， 闪 


烁 次 数 人 增加 
ee 
司 太 
图 5.4 

程序 例 2 分 析 : 


本 程序 可 以 测验 游戏 者 的 记忆 力 ， 彩 色 画板 任 意 闪 烁 ， 游 戏 者 按照 彩色 画板 闪烁 的 顺序 按 方 
向 键 ， 画 面 的 上 、 下 、 左 、 右 分 别 对 应 着 [一 >][][+ ] 四 个 按键 。 开 始 时 ,画面 闪烁 一 次 ， 然 后 屏 
幕 中 央 出 现 “YOU” (中文 意思 “你 ”) 字样 ， 提 示 游 戏 者 回答 。 若 游戏 者 按键 回答 正确 ， 则 下 次 
画面 连续 闪烁 两 次 ， 然 后 再 请 读者 回答 。 就 这 样 连 续 闪 烁 的 次 数 递增 ， 最 大 值 由 程序 第 20 语句 中 
变量 MAX 决定 。 在 按键 回答 的 过 程 中 , 若 每 次 按键 回答 正确 ， 画 板 重复 闪烁 一 次 ; 若 回答 错误 ， 
画板 将 重新 连续 闪烁 ， 然 后 再 请 游戏 者 回答 。 

程序 的 第 40 语句 定义 了 Z$ 字符 串 , 查看 附录 中 的 符号 代码 表 B 和 封 3 符号 图 表 B 可 知 Z$ 
字符 串 是 由 5 个 小 方块 顺序 排列 组 成 的 长 方 条 ， 这 个 长 方 条 在 后 面 第 440 语句 开始 的 子 程序 中 用 
来 拼 出 闪烁 用 的 彩色 画板 图 案 。 

程序 第 50 句 定义 N$ 字 符 中 为 5 个 空格 , 这 个 字符 串 在 后 面 由 第 500 句 开 始 的 子 程序 中 , 用 
来 使 彩色 画板 的 图 案 消失 ， 以 达到 闪烁 的 目的 。 

程序 第 60 一 100 语句 定义 数组 PL、PX、PY、C。PX、PY 数组 配对 指定 彩色 画板 的 左上 角 在 
屏幕 上 的 位 置 ， 从 而 指定 整个 彩色 画板 在 屏幕 上 的 位 置 。 这 四 个 位 置 的 座 标 是 (16，8)，(0，8)， 
(8，0) 和 《8，16)， 分 别 对 应 着 右 、 左 、 上 、 下 四 个 位 置 。 在 这 段 程序 中 先 用 PX、PY 数组 定义 
好 这 四 个 位 置 座 标 , 在 后 面 控制 画面 闪烁 时 使 用 。C 数组 用 来 定义 彩色 画板 的 颜色 , 在 第 480 语句 
中 使 用 。 
程序 第 120 语句 一 第 220 语句 控制 彩色 画板 闪烁 ， 在 这 段 程序 中 2Z 变量 是 控制 连续 闪烁 次 数 
的 。 第 120 语句 PL (Z) =RND (4) 是 使 PL 数组 为 不 可 预测 的 数组 。 从 PL 〈0) 到 PL 
(MAX) 的 值 都 是 事先 不 可 预知 的 ， 在 第 140 语句 中 作为 PX、PY 数组 的 下 标 ， 即 PX (N) 中 的 
N，, 指定 彩色 画板 的 定位 位 置 (X，Y), 因此 彩色 画板 闪烁 的 位 置 的 顺序 也 就 成 为 事先 不 可 预测 的 
了 。 在 第 170 语句 先 调用 440 语句 为 首 的 子 程序 ， 然 后 再 在 第 190 语句 调用 500 语句 为 首 的 子 程 
序 ， 前 面子 程序 的 作用 是 使 彩色 画板 出 现 ;后 面子 程序 的 作用 是 使 彩色 画板 消失 ,这样 使 屏幕 出 
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现 彩 色 画 板 的 闪烁 。 
当 彩 色 画 板 闪 烁 结束 后 ， 第 250 语句 就 使 屏幕 上 出 现 “YOU” 字样 提示 游戏 者 按键 回答 。 
第 260 语句 从 键盘 取得 所 按 下 的 键 的 键 符 ， 第 270 语句 判 断 键 符 是 不 是 [人 jy][ 二 | 人] 键 符 ， 
若 不 是 则 重 来 。 
第 280 语句 判断 所 按 下 的 键 是 否 正确 ， 若 不 正确 ， 则 反 回 130 语句 ， 重 新 连续 地 闪烁 彩色 画 
板 一 次 。 若 正确 ， 则 再 次 闪烁 该 键 所 对 应 的 彩色 画板 一 次 。 
第 360 语句 使 彩色 画板 连续 闪烁 的 次 数 递 增 。 
第 370 语句 判断 连续 闪烁 的 次 数 是 否 已 到 了 第 20 语句 所 定义 的 最 大 值 MAX , 若 已 到 最 大 值 ， 
则 跳 转 到 410 语句 结束 ， 屏 幕 上 出 现 “GOOD1!!?” 字样 ， 中 文 意思 “好 1!1? 
程序 例 3， 飞 碟 UFO 
程序 清单 ， 
10 VIEW:CGEN 2:PLAY“T1C1” 
20 U0$=“89:;”:U14 =“ 一 一 >>?”:B$ 一 CHR $ (172) 十 CHR $ (173) 十 CHR $ (1747 十 CHR 
$ (175) :FOR I 一 0 TO 3:X$ 一 X$ 十 CHRS$(180 二 TD:NEXT:V 王 1 
30 LG=16:RG=220:TG=50:BG=100:GX=0:GY=0:GV=16:BX 一 100:;BY 一 220:;BV 一 6， 
DX 一 0:DY=-0:DV=30:R=12:X=0:Y=0;D=0 
40 G0$ 王 CHR$ (212):G1$ 一 G1$ (213):D0$ =CHRS$ (209):D1$ 王 G1$ 
50 PALETS 1,13,48,22,7:PALETS 2,13,48,22,1:PALETS 3,13,48,22,1:DEFSPRITE 1， 
(2,1,0,0,0) 一 X$ :DEF SPRITE 6,(3,1,0,0,0) 王 B$ :GOSUB310:SPRITE ON 
60。，VX=V 二 RNDCR):VY=V 二 RNDCR) 
70  C=RND(5):Y 一 YH+VYIX=X 二 VX* SGN(C):GOSUB260:T 一 STRIG(0):S 一 STICKCO) 
80 SWAP G0$ ,G1$4 :SWAP D0$ ,D1$ :SWAP U0$ ,U19$ :GOSUB310 
90 IF G= 一 1LTHEN 120 
100 IF T<8 THEN160 
ll10  GX=BX 十 6:GY=BY:G 一 一 1 
120 ;,GY=GY 一 GV 
130 IF GY<TG THEN G 一 0:GX 一 0:GY=-0:GOTO160 
140 SPRITE 7,GX,GY 
150 IF ABS(GX 一 X 一 5)<6 THEN IF ABS(GY 一 Y 十 8)<8 THEN330 
160 JIF S=1THEN BX 一 BX 十 BV:IF BX 之 RG THEN BX=RG- 
170 IF S=2 THEN BX 王 BX 一 BV:IF BX<LG THEN BX=LG 
180 下 D= 一 1THEN210 
190 “了 ABSCBX 二 X) 关 5 THEN240 
200，DX 一 X 十 6:DY=Y:;D= 一 1 
210 DY=DY+DV:IF DY>255 THEN SPRITE 5:D=0:DX=0:DY=0:GOTO240 
220 SPRITE 5,DX,DY 
230 IJF (BY 一 DY)<<6:THEN IF ABSCBX 一 DX 十 6)<8 ~HEN350 
240 :IF BG 二 210 THEN IF RND()=0THENTG=TG+V:BG=BG 十 V 
250 GOTO70 
260 ]JF X<LG THEN X=LG:VX 一 一 VX 
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270 
280 
290 
.300 
310 


下 X>RG THEN X 王 RG:VX 一 一 VX 

IF Y<TG THENY 一 TG:VY 一 一 VY 

IF Y>BG THEN Y==BG:VY 一 一 VY: 正 BG>210 THEN360 
RETURN 

.DEF SPRITE 0,(1,1y0,0,0) 一 U0 $ :DEF SPRITE 5,(0,0,0,0,0) 一 D0$ :DEFSPRITE 


7,(3 0,0,0,0) 一 G0$ 


320 
330 


SPRITE 0,X,Y:SPRITE 7,GX,GY:SPRITE 5,DX,DY:SPRITE 6,BX,BY:RETURN 


FOR I=0 TO 9:SWAPXS$ ,U0$ :DEF SPRITE 0,(3,1,0,0,0) 一 U08$ :SPRITE 0,X,Y， 


PAUSE 10:PLAY"D5FE1":NEXT 


340 


PR 一 PR 十 10:LOCATE 15,0:PRINT"SCORE :”PR:GX 一 0:GY 一 0:V 一 1 十 PR/20:GO- 


TO30 


350 


FOR I=0 TO 5:SPRITE 6:PLAYD1Bl*:,PAUSE 8:SPRITE 6,BX,BY:PAUSE 10:， 


NEXT:SPRITE5:DX=0:DY=0:D=0:B=B 十 1:IFE B<4THEN30 


360. 


加 


PLAY"O1C4EC":INPUT"RETURN“ 3I:RUN 


背景 
0 1 2345 6 7 8 95 ii lz 13 34 1 1 37 18 II 2 222 2 2 25 2 27 
| 汪汪 凡 芒 天 芝 会 四 本 训 环 玫 交 革 者 项 全 过 天 芝 部 由 现 儿 
| | MaM3i 二 本 
|F 旭 | D41 | D41|D4I | 避 交 请 呈 王 全 王 三 区 六 区 到 和 蕊 下 二 二 而 遇 
人 | 本 放 古 阁 卫 时 天 & 几 硬 汪 全 前 而 洒 雹 天 进 汪 可 风 
呈 罗 拓 项 渍 加 一 巡 | | cel | | | | | lce| 
二 二 二 二 全 要 肌 攻 攻 本 太 汪汪 区 下 天 失信 册 病 藉 册 革 交大 半生 
| | jcezl | | | 8 RE 本 定 芝 币 下 衣 让 下 记 凑 寻 请 本 的 汪 
重 放 从 几 滋 是 天 到 证 | _tesr | al | 
下 3 0 
Ge | | 人 剖 寺 和 提 瑟 关 证 茂生 放 衣 部 沁 本 凤 这 起 放 淹 大 四 
全 站 属 天 [| | + jeel lg | | 
区 汉 大 罕有 病 喇 恬 图 属 本 沽 本 汉沽 由 由 生 辣 山 尖 师 过 闫 遇 证 二 网 间 二 三 本 员 
[| cezl 国 | ee [> 村 1 
区 加 而 册 天 和 淹 刘 证 晰 过 四 泛 这 年 洛 | | | 
-- 4 | | | | | colcoel | | | 
jcoo| | | jcoelclolcoe|GczolGaolGldl | | 
[czo | | jcoo|czolGzojczo|G2o|Gao|GaolGlaol| 上 | 
[Gdo|G40|G4|G261020|G40|G 如 |G30|G3o1G40|G4o| 
[Mrzo|M7o| GdojM7ojM7a|G4e|c40|M7a|G40 1G40|GesejM7ojMzo| 、 
|F32|F32|F32|F32|F32|F32 |F32|F32 |F32|F32|F32|P32|F32 |P32 | 下 32|F32|F32]F321F32|F32|F32 |F32|F32 | 


|F32 | F32 |F32|F32|F32 | 
[wz2lM721M72|M72[M72[M72[M723|M72|M72|M721M721M723jM72|M72|M721M72|M72[M72|M72j9472 ja4721M72JM472|M721M72|M7ZM73|M72 


(UFO) 


从 谜 一 般 的 不 明 飞 行 物 中 出 现 了 苍蝇 ， 赃 准 你 的 太空 船 ， 在 苍蝇 的 攻击 下 ， 太 空 船 将 会 躲藏 


起 来 ， 并 开始 还 击 。 


《游戏 方法 
1 人 玩 。 按 1 号 控制 器 十 字 按 钮 的 左 、 右 方向 移动 太空 船 ， 按 A 按钮 发 射 子弹 攻击 苍蝇 。 
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2 一 ， ScoRE，50 
一 ECEIOG6G 一 


克 广 妇 
交 
从 二 
次 
闪 广 ED 六 
最 人 
Na 
次 从 六 


图 5.5 


程序 例 3 分 析 : 

此 程序 是 飞船 打 苍 蝇 游 戏 。 游 戏 开始 时 ， 从 屏幕 左上 角 的 不 明 飞行 物 UFO 中 飞 出 苍蝇 屏幕 
的 下 方 出 现 太空 船 ， 苍 蝇 飞 舞 着 翅膀 上 、 下 、 左 、 右 来 回 飞行 ， 当 苍蝇 对 准 太空 船 时 ， 就 向 太空 
船 发 射 激光 弹 。 游 戏 者 用 操纵 器 的 十 字 按键 控制 太空 船 左 、 右 运动 ， 用 A 按钮 控制 从 太空 船 发 射 
激光 刀 ， 向 苍蝇 进行 还 击 。 如 果 激 光 刀 击 中 苍蝇 ， 则 苍蝇 爆炸 ， 在 屏幕 的 右上 角 显 示 游 戏 者 的 累 
计 得 分 ， 如 果 苍蝇 发 出 的 激光 弹 击 中 太空 船 ， 太 空 船 闪烁 6 次 ， 然 后 重新 开始 。 如 果 四 次 命中 太 
空 船 ， 则 游戏 结束 ， 屏 幕 出 现 “RETURN” 字 样 ， 中 文 意思 是 返回 等待 游 戏 者 按 
“[LRETVRN ]” 键 ， 游 戏 重 新 开始 。 

程序 的 第 20 一 40 语句 是 用 来 定义 字符 串 和 给 一 些 变量 赋值 。 

第 20 语句 定义 了 字符 串 U0$ ，U1$ ，B$ 和 XS$ . 在 后 面 的 DEF SPRITE 指令 中 分 别 用 于 
定义 卡通 苍蝇 1， 苍 蝇 2， 太 空 船 和 爆炸 。 

第 40 语句 定义 字符 种 G0$ ，G1$ ,， D0$ 和 D1$ .。 在 后 面 的 DEF SPRITE 指令 中 分 别 用 于 
定义 卡通 激光 刀 1， 激 光 刀 2 和 激光 弹 。 

第 30 语句 给 一 些 变量 赋值 。.LG 和 RG 分 别 定义 苍蝇 和 太空 船 左 、 右 运动 的 范围 ; TG 和 BG 
定义 苍蝇 上 、 下 运动 的 范围 .GX 和 GY 是 激光 刀 的 座 标 ; GV 是 激光 刀 运 动 的 速度 。 DX 和 DY 是 
激光 弹 的 座 标 , DV 是 激光 弹 的 速度 。BX 和 BY 是 太空 船 的 座 标 ; BV 是 太空 船 的 速度 X 和 立地 
苍蝇 的 座 标 ， 它 的 运动 速度 是 由 第 60 语句 的 随机 函数 控制 的 。 
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第 50 语句 ， 第 310 语句 的 DEF SPRITE 指令 定义 卡通 0 为 苍蝇 ， 卡 通 1 为 爆炸 ,卡通 5 为 
激光 弹 ， 卡 通 6 为 太空 船 ， 卡 通 7 为 激光 刀 。 

第 60 语句 产生 苍蝇 X 方 向 和 Y 方向 的 运动 速度 VX 和 VY。 

程序 的 主体 是 第 70 语句 一 第 250 语句 的 循环 体 。 

“第 70 语句 首先 调整 苍蝇 的 位 置 座 标 X.Y, 并 且 调 260 语句 的 子 程序 ,判断 是 否 越 出 了 上 、 下 、 
左 、 右 所 限定 的 运动 范围 ， 如 果 超 出 了 运动 范围 ， 则 令 其 向 相反 方向 运动 ， 然后 再 从 操纵 器 取得 
十 字 键 的 方向 代码 S 和 按钮 的 控制 代码 T。 

第 80 语句 交换 字符 串 G0$ 和 G1$ 、D0$ 和 D1$'、U0$ 和 QUOLTS$，, 并 且 调 用 310 语句 的 子 程 
序 ， 这 个 子 程序 的 作用 是 定义 卡通 0 苍蝇 、 卡 通 5 激光 弹 、 卡 通 7 激光 刀 ， 并 且 使 卡通 0 出 现在 
(X，Y) 位 置 、 卡 通 5 出 现在 (DX，DY) 位 置 、 卡 通 6. 出 现在 (BX，BY) 位 置 ,卡通 7 出 现在 
(GX,，GY) 位 置 。 交 换 字 符 串 的 原因 是 卡通 0 苍蝇 、 卡 通 5 激光 弹 和 卡通 7 激光 刃 都 有 两 种 姿势 ， 
两 种 姿势 需要 交替 出 现 。 

第 90 语句 一 140 语句 控制 激光 刀 的 运动 。 当 太空 船 发 射出 激光 刀 后 , -第 110 语句 令 变量 G 王 
一 1, 以 后 程序 再 次 循环 执行 到 第 90 语句 时 , 则 转 到 第 120 语句 , 使 激光 刀 的 立方 向 座 标 递减 , 这 
样 就 使 激光 刀 连 续 的 向 上 运动 。 直 到 激光 刀 的 立 座 标 等 于 TY， 第 130 语句 令 G 王 0， 可 以 再 次 发 
射 激 光 刀 了 。 

第 150 语句 判断 激光 刀 是 否 击 中 苍蝇 ， 若 击 中 苍蝇 ， 则 跳 到 第 330 语句 。 

第 160 一 170 语句 根据 从 操纵 器 十 字 键 输入 的 方向 代码 调整 太空 船 的 和 方向 座 标 BX, 控制 太 : 
空 船 左右 运动 。 

第 180 一 220 语句 控制 激光 弹 的 运动 ， 其 原理 同 激 光 刀 运动 的 原理 。 

第 230 语句 判 断 激光 弹 是 否 命中 了 太空 船 ， 如 果 击 中 了 太空 船 则 跳 转 到 第 350 语句 ,太空 船 
发 生 闪 烁 ， 并 且 令 记 忆 太 空 船 被 击 中 的 次 数 的 变量 B 加 1 如果 了 B=4， 即 被 击 中 4 次 ， 则 游戏 结 
束 ， 屏 幕 出 现 “RETURN” 字 样 ， 待 游戏 者 按 “| RETURN ]” 键 ， 游 戏 重 新 开始 。 

第 250 语句 控制 程序 跳 转 到 70 语句 ， 使 程序 循环 执行 。 

第 330 语句 完成 当 太空 船 发 射 的 激光 刀 命 中 苍蝇 后 令 苍蝇 发 生 爆 炸 ,并 且 在 屏幕 右上 角 显 示 
英文 “SCORE” (中 文章 “分 数 ”)” 安 样 和 累计 的 分 数 ， 然 后 使 苑 蝇 运 动 的 速度 增 大 。 
程序 例 4，66 号 公路 
程序 清单 
10 VIEW: CGEN 2: CGSET 1，2: PALETS 0，13，22，39，2: SPRITE ON: PLAY?T103” 
20 X1=150:, X2 王 170: X3=190: X6=136:; X7 一 208: C0$ =CHR$ (136) 十 CHR $ (137) 
二 CHR$ (138) 十 CHR $ (139); C1$ =CHR $ (140) +CHR$ (141) 十 CHR $ (142) 十 CHR 
$ (143):， B$ 一 CHR $ 〈214) 

30 FOR I=4TO 7:， DEF SPRITE I，(0，0，0，0，0) ==B$ :NEXT 
40 FEF=2， SC=0:， CA=3: L 一 0:, X=208:， Y0=150; V=0 
50 L=L++1， M=Lx 3 二 15;， MV=M 十 33: D= (M 十 27) x 400 
60 C=0 
70 S=STICK (0): T=STRIG (0)， V=V--1 
80 IF S=1THEN X=X 二 5 
90 IF S=2THEN X=X 一 5 
100 IFT=8THEN V=V++4: IF V>MV THEN V=MV 
139 


li0 IFT=4THEN V 一 V 一 4 

120 IF V<1THEN V=0 

130 IF X<143 OR X>>193 THEN 310 

140 下 =1 

150 Y 立 =Y0 一 V/2:， DEF SPRITE 0，(0，1，0 0，0) 一 C0$ :， SPRITE 0，X，Y，SWAP C0 
$，Cl1$ 

160 IF Fl= 一 1 ANDF2 王 一 1 AND F3= 一 1 THEN SC=-SC 二 1、F1=0: F2 一 0， F3=0 

170 FOR I=1TO3，DEF.SPRITEI，(17 17 0，0，0) =C0$ ， NEXT 

180 YY= (40 一 Y5) x* \(Y5 之 40) ， SPRITE1,，X1，Y1: SPRITE2，X2，Y2:， SPRITE3，X3， 
Y3，SPRITE4，X6，Y5，SPRITE5，X7，Y5，SPRITE6，X6，YY:，SPRITE7，X7，YY 
190 IF ABS (Y1 一 Y) <12 THEN Fl=V>V1:， IF ABS (X1 一 X) <10 THEN340 

200 IF ABS (Y2 一 Y) <12 THEN F2=V>V2: IF ABS (X2 一 X) <10 THEN340 

210 IF ABS (Y3 一 Y) <15 THEN F3 王 V>V3: IF ABS (X3 一 X) <10 THEN 340 

220  Yl=Y1+TV 一 Vi:Y2=Y2 十 V 一 V2; Y3 王 Y3 十 V 一 V3: Y5=-Y5 十 V: XX 一 XX 十 2: X1 一 
ABS (XX) 十 143，IF XX>48 THEN XX 一 一 51 

230 IF Y1>250 THEN V1=RND (M) 十 30， YI1=0 

240 IF Y2>250 THEN Y2 一 0: X2 王 RND (58)，V2 王 RND (M) 十 30 

250 IF Y3>250 THEN Y3 王 0，X3 王 RND 《58) 十 138:， V3 王 RND (M) 十 30 

260 Y5 一 一 Y5x* (Y5<<250) ，Y1 一 Yi 一 〈(Y1<0) <* 255: Y2 一 Y2 一 〈Y2<0) * 255: Y3 一 
Y3 一 〈Y3<0) * 255 

270 D=D 一 V: IF CC 一 C/1o0x 100 王 0 THEN GOSUB 380 

280 IF D<0oTHEN GOSUB380, PRINTGOOD1!": PLAYCGDAB”:; SC=SC 十 (500 一 C) /I0， 
GO TO 50 

290 C=C+1:， IF C<401 THEN70 

300 _ PRINT?TIME UP"， PLAY"BAGFEDC"”:, F=3: 工 =L 一 1，GOTO 340 

310 V=V 一 4: IFEF=2THEN V=V 二 4: IF V>MV 一 15 THEN V=MV 一 15 

320 IF V<0OTHEN V 王 0: 下 王 2 

330 GOTO 150 

340，PLAY%BAEDC": CA=CA 一 1: IF CA> 一 1THEN X=208:V=0: GOSUB 380, ONFGO- 
TO70，70，50 

350 PRINT'GAME OVER1!":, ,PRINT2TRY AGAIN7 

360 JIF STRIG (8) 一 >1THEN 360 

370 GOSUB 380: GOTO 10 

380 IF SC>HI THEN H1=SC 

390 LOCATE 0.0: PRINTHIGH SCORE"”， H1:， PRINTLEVE"; 直 ， PRINTSCORE"“ SC， 
PRINT'CARSw CA: PRINT, PRINT:PRINT%LEFT" D/4;"M": PRINT:PRINT5LEEFT”; 400 一 
Ci"SEC"”，PRINT:，RETURN 
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《66 号 公路 》 


使 比赛 汽车 飞 驶 在 无 尽 头 的 连续 直线 马路 上 。 用 加 速 器 加 速 快速 地 操纵 把 手 ， 追赶 挡住 去 


路 的 干扰 物 。 


(游戏 方法 ， 


1 人 玩 。 在 限定 的 时 间 内 必须 跑 完 所 指定 的 距离 ， 按 操纵 器 十 字 按 钮 的 左右 两 边 来 澡 用 把 手 ， 
A 按钮 是 加 速 器 ，B 按钮 是 刹车 ， 若 与 其 它 车 子 碰 擅 便 会 爆炸 ， 在 起 动 位 置 加 速 后 ， 请 进入 跑道 。 


站 


人 


已 了 七 


程序 例 4 分 析 ， 


本 程序 是 寒 车 游戏 。 游 戏 者 必须 在 规定 的 时 间 内 跑 完 全 程 。 操 纵 器 十 字 按 键 的 左 、 右 方位 可 
控制 赛车 左 、 右 移动 ， 躲 避 跑 道上 的 其 它 干 扰 车 辆 ， 若 碰 上 干扰 车 辆 ， 赛 车 会 发 生 爆 炸 。 操 纵 器 


A 按钮 是 加 速 ，B 按钮 是 刹车 。 赛 车 共 可 与 干扰 车 辆 碰撞 发 生 爆 炸 四 次 ， 超 过 四 次 ， 游 戏 结束 。 游 


戏 的 难度 是 分 级 的 ,难度 级 越 高 ， 赛车 的 最 高 速度 越 大 在 规定 的 时 间 内 所 要 跑 完 的 路 程 越 长 。 如 


果 在 规定 的 时 间 内 ， 赛 车 跑 完了 全 程 ， 则 难度 级 自动 加 1， 游 戏 重 新 进行 ;如果 规 定 的 时 间 用 完 ， 
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赛车 未 跑 完全 程 ， 则 难度 级 不 变 ， 继 续 在 这 一 难度 级 下 重新 开始 。 

本 程序 共 定义 了 8 个 卡通 ， 卡 通 0 为 赛车 ， 卡 通 1、2、3 为 干扰 车 辆 ， 卡 通 4、5、6、7 为 跑 
道 边 上 的 标志 物 。 各 卡通 的 位 置 座 标 分 别 用 (X，Y)，(Xi，Yi) ，……， (X;，Y?) 表示 。 第 30 语 
句 定义 卡通 4、5、6、7。 第 150 语句 定义 赛车 ， 其 后 面 交换 字符 串 变量 C0$ 和 C1$ 是 为 了 使 赛 
车 的 两 个 卡通 姿 势 轮流 出 现 。 第 170 语句 定义 卡通 1、2、3。 

程序 第 20 语句 中 字符 串 变 量 C0$ ，C1$ 在 第 150 语句 和 第 170 语句 中 是 用 来 定义 卡通 赛车 
和 干扰 车 辆 的 。 字 符 串 变量 B $ 在 第 30 语句 中 用 来 定义 跑道 上 的 标志 物 卡 通 。 

程序 第 40、50' 鲍 句 给 一 些 变量 赋值 ， 其 中 世 为 难度 级 变量 ，MYV 为 最 高 速度 ，D 为 在 规定 时 
间 里 所 要 跑 完 的 距离 。SC 是 用 来 累计 得 分 的 变量 。CA 是 用 来 记录 赛车 碰撞 爆炸 的 变量 ， 初 值 为 
3， 每 碰撞 一 次 CA 变量 减 14， 直 到 小 于 零 ， 则 游戏 结束 。X 是 赛车 的 X 座 标 ，Y0 是 赛 车 的 “ 基 
本 座 标 ”, 在 第 150 语句 中 令 赛车 的 Y 座 标 Y= Yo 一 V/2, 即 赛车 的 Y 座 标 为 基本 座 标 Y0 减 去 V/ 
2，V 是 速度 变量 。 

第 70 一 290 语句 是 程序 的 主体 ， 循 环 执行 ， 完 成 以 下 几 个 任务 

(1) . 根据 从 操纵 器 取得 的 方向 代码 来 调整 赛车 的 X 座 标 。 第 70 一 90 语句 。 

《2) . 根据 按钮 A、B 是 否 按 下 来 调整 车 速 V。 第 100 一 120 语句 。 

(3) . 判断 赛车 是 否 越 出 跑道 。 第 130 语句 。 

如 果 寨 车 出 了 跑 首 ， 则 从 第 130 语句 跳 转 到 第 310 语句 执行 越 出 跑道 的 处 理 。 第 310 语句 令 
车 速 V 减 小 4 个 单位 ， 如 果 不 按 操纵 器 的 十 字 按 键 使 赛车 返回 跑道 ， 则 每 次 执行 第 310 语句 使 车 
速 V 递减 4 个 单位 , 直到 车 速 减 到 零 为 止 。 此 时 第 320 语句 令 变 量 F 王 2， 当 再 次 执行 到 第 310 语 
句 ， 先 令 V 减 小 4 个 单位 〈V 已 为 负 值 )， 然 后 判断 一 2， 则 令 V 再 增加 4 个 单位 ， 这 样 就 保持 
了 V=0。 

〈4) . 根据 车 速 V 调整 赛车 的 立方 向 座 标 ， 并 使 卡通 0 赛车) 出 现在 调整 后 的 位 置 〈X， 
Y) 上 。 第 150 语句 。 

(5) . 给 赛车 加 分 。 第 160 语句 。 

加 分 的 条 件 是 赛车 超过 三 个 干扰 车 辆 ， 用 F1、F2、F3 等 于 一 1 来 作为 超过 干扰 车 辆 1、2、3 
的 标志 ， 这 三 个 标志 是 由 第 190 一 210 语 句 给 出 的 。 

《6). 根据 车 速 V 调整 干扰 车 辆 的 座 标 ， 调 整 跑道 边 标 志 物 的 座 标 ， 并 令 它们 出 现在 屏幕 上 。 
第 220 一 260 语句 ;第 170 一 180 语句 。 

第 220 语句 调整 卡通 1、2、3、4、5 的 Y 座 标 ，XX 变量 的 作用 是 使 卡通 1 在 跑道 上 左 、 右 晃 
动 。 第 230 一 260 语句 的 作用 是 使 1、2、3、4、5 号 卡通 从 屏幕 底部 消失 时 ， 再 从 屏幕 上 边 跑道 上 
出 现 。 第 180 语句 是 使 卡通 6、?7 的 Y 座 标 与 卡通 4、5 的 Y 座 标 相 差 40 个 单位 。 

(7) . 给 出 赛车 超车 标志 F1、F2、F3 和 判断 赛车 与 干扰 车 辆 碰撞。 第 190 一 210 语句 。 

在 这 段 程序 中 通过 判断 赛车 的 Y 座 标 和 干扰 车 的 立 座 标 来 判断 赛车 是 否 超过 干扰 车 辆 。 同 时 
比较 X 座 标 判断 赛车 与 干扰 车 辆 是 否 发 生 碰 撞 。 若 发 生 碰 兵 ， 则 跳 转 到 第 340 语句 ， 令 CA 变量 
减 1， 若 碰撞 发 生 四 次 ， 则 游戏 结束 ， 屏 幕 出 现 “GAME OVER” (游戏 结束 ) “TRY AGAIN” 
(请 再 试 ) 字样 等 待 游戏 者 按 START 键 重新 开始 游戏 。 

《8) . 断 是 否 跑 完 全 程 。 第 270 一 280 语句 。 

第 270 语句 使 记录 剩余 路 程 的 变量 D 递减 ,并 且 每 隔 100 个 时 间 单 位 ， 调 用 380 语句 的 子 程 
序 ， 显 示 最 高 分 、 难 度 级 、 得 分 、 赛 车 个 数 、 剩 余 距 离 、 剩 余 时 间 等 参数 。 

第 280 语句 ,判断 是 否 已 跑 完 全 程 , 若 跑 完全 程 ， 显 示 “GOOD!”( 好 !) 字样 , 计算 得 分 SC， 

142 


显示 各 个 游戏 参数 。 跳 转 到 50 语句 ， 使 难度 级 加 1， 继续 重新 开始 游戏 。 


(9) . 判断 时 间 是 否 用 完 。 第 290 一 300 语句 。 
在 本 句 中 ， 令 时 间 变 量 C 加 1， 如 果 C 小 于 400， 返 回 70 语句 继续 。 如 果 C 大 于 400， 显 示 


“TIME UP”( 时 间 到 ) 字样 ， 跳 转 到 第 340 语句 。 判 断 4 个 赛车 是 否 都 用 完了 ， 如 果 未 用 完 ， 赛 
车 返回 起 跑 位 置 ， 继 续 进 行 游戏 。 若 用 完了 ， 游 戏 就 结束 了 。 


第 380 一 390 语句 用 于 在 屏幕 上 显示 各 个 参数 。 
下 面 解释 一 下 屏幕 上 出 现 的 英文 的 意思 : 


HIGH SCORE 高 分 
LEVEL 难度 级 
SCORE 得 分 
CARS 车 
LEFT 剩余 
SEC 秒 

M 米 


程序 例 5: 打字 专家 
程序 清单 ， 


10 
20 
30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 


CGEN 3: CGSET 1，1 
VIEW:， PLAY"T104C1 
PO=-PP: I 王 J，K=L 
PO$ =-"0102030405" 
PP$ 一 "CDEFGAB" 
AJ$=BV$ 
M3$ 一 "CANAJ" 
N$=CHRS$ (227): NN$=N$+TNS+TNS$+NS+TNS$TNST+TNY 
DIM DP (64)，PP 〈64) 
FOR I=0 TO 63:， READ DP (D)， NEXT 
DEF SPRITE 0，(0，0，0，0，0) =CHRSY$ (199) 
SPRITE ON 
VIEW K=0:， LOCATE 2，5: FOR I=-9 TO 0 STEP 一 1: PRINT LI ， NEXT 
PAUSE 100， A$ =CHR$ (48 十 RND (43)): SPRITE 0 
LOCATE 3，10: PRINTTHIS, . . 
LOCATE 13，10: PRINT A$ 
GOSUB 460 
FOR I=-0 TO 75 
FOR J]=0TO 5: B$=INKEYS 
SPRITE 0，38 十 2x* TI，53 
IF B$ 一 >wTHEN SWAPA$,B$ :GOSUB 370:SWAPA$,B$:IFA$=B$THEN 


220 
230 


NEXT，NEXT:，LOCATE 5，3:， PRINT NN$ 
IF I>>100 THEN PLAY"O4B1AG2FE3D4C":， K 王 K 十 1，GOTO 140 
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240 LOCATE 4，15:， PRINT K; RIGHT ON-” 


250 LOCATE 3，16: PRINT TRY AGAIN? 53: A$=INKEYS$ (0): IFAS$=NTHEN LO- 


CATE 0，18:， END 

260 GOTO 130 

270 

280 DATA 0，21，22，23，24，24，25，25，26，27 
2390 DATA 14，14，5，28，6，7 

300 DATA 29，21，22，23，24，24，25，25，26， 27 
310 DATA 14，14，5，28，6，7，21 

320 DATA 7，3，2，9，16，10，10 

330 DATA 11，19，11，12，13，4，4 

340 DATA 20，21，1li4，17，8，17，18 

350 DATIA 3，15，1，18，0 

360 DATA 0，28，0，28，7 

370 JIF A$< ”THEN PLAYOIC1EC"，A$ 王 ”” 


380 FAS$>' 一 "THEN PLAY"D5B1AB":， LOCATE 5，3: PRINT M3$ : AS$==” 


A$ 一 ”THEN RETURN 
400 IF AS$= 和 MOR A$= 人 THEN PLAY"O0OA1，O0B1"”，GOTO 450 
410 PO=DP (ASC (AS$) 一 32》 /7 
420 PP=DP (ASC (A$) 一 32) 一 PO* 7 
430 PLAY MID$4 (PO$，PO*2 十 1. 2) 十 MID$ (PP$，PP 十 1，1) 
440 PLAY MID$ (PP$，PP 十 1，1) 
450 RETURN 
460 FOR J=0TO5:， GOSUB 400， NEXT:，RETURN 
背景 


0 了 和 了 这 全 S 8 9 IiI il li3 14 1 16 37 18 19 20 2 22 23 34 25 


aa 
妈 
[] 
wa 
tS 
[ 

= 

必 

9 


人 
罗 
已 


| 两 1 到 可 Ja0 EDITEE 


J03 


| | 庆 | 疝 ] J33 家 砚 吓 轩 于 名 
全 
要 


汪汪 二 本 
(打字 专家 ) 


”390 正 


26 27 


记 住 字 盘 的 排列 是 很 困难 的 ， 如 果 能 幸运 地 记 住 这 些 字母 在 键盘 上 的 位 置 ， 就 掌握 了 打字 


机 ， 成 为 一 各 出 色 的 打字 员 。 
上 44 


《游戏 方法 》 
1 人 玩 。 在 键盘 字符 区 找 出 和 屏幕 中 央 部 分 右 侧 显 示 的 字母 、 数 字 或 符号 相同 的 字符 并 输 六 
之 。 当 旗子 右 移 消失 后 ， 时 间 也 就 结束 了 。 


图 5.7 
程序 例 5 分 析 ， 

本 程序 可 以 帮助 游戏 者 熟悉 键盘 。 游戏 开始 , 屏幕 上 方 的 方 框 中 出 现 从 9 一 0 共 19 个 数字 , 在 
数字 9 上 方 出 现 一 个 小 旗子 。 在 屏幕 中 央 左 边 的 方 杠 中 出 现 “THIS”( 中 文 意思 “这 个 ”) 提示 符 
后 ， 右 边 的 方 框 随即 出 现 一 个 随机 的 〈 任 意 的 、 且 不 可 预测 的 ) 字符 ， 然 后 小 旗子 即 开 始 由 左 向 
右 移动 ， 指 示 时 间 。 游 戏 者 应 在 小 旗子 移 到 最 右边 的 数字 -0 的 上 方 之 前 ， 在 键盘 上 找到 相同 的 字 
符 输入 。 如 果 输 入 正确 ， 则 会 出 现 新 的 字符 ， 重 复 进行 。 如 果 时 间 用 完了 ， 也 未 能 从 键盘 输入 正 
确 的 字符 ， 则 显示 前 面 正 确 输 入 字符 的 个 数 ， 游 戏 结束 。 

程序 第 40、50、90 语 句 定义 的 变量 PO $ 、PP $ 和 数组 DP (64)、PP 〈64) 与 第 400 一 460 
语句 结合 起 来 用 于 程序 中 演奏 音乐 。 

程序 第 80 语句 定义 了 NN$ 变量， 用 于 当时 间 用 完 后 ， 在 屏幕 上 显示 出 两 条 线 ， 

第 110 语句 定义 卡通 0 为 小 旗子 ， 用 于 指示 时 间 。 

第 130 语句 在 屏幕 上 方 的 方 格 中 从 左 至 右 显示 9 一 0 10 个 数字 。 

第 140 一 260 语句 是 程序 的 主体 。 

第 140 语句 产生 一 个 随机 的 字符 A$ ， 其 范围 是 附录 符号 代码 B 中 从 0 一 Z 共 43 个 字符 。 

第 150 语句 在 屏幕 中 央 左 方 的 方 框 中 显示 提示 符 “THIS”。 

第 160 语句 在 屏幕 中 央 右 方 的 方 框 中 显示 字符 Ag$ 。 

-第 170 语句 调用 伴奏 子 程序 。 

第 180 一 220 语句 是 一 个 双重 循环 体 。 

在 这 个 循环 体 中 , 第 200 语句 用 外 重 循环 的 控制 变量 I 控制 小 旗子 的 X 座 标 , 使 小 旗子 右 移 。 

第 190 语句 扫 眶 键盘 ， 并 把 从 键盘 输入 的 字符 代入 B$ 中 。 

第 210 语句 判断 如 果 有 键 按 下 , 交换 A$ 和 了 BS$，, 调用 370 语句 开始 的 子 程序 。 在 这 个 子 程序 
中 再 判断 如 果 输 入 的 键 值 小 于 空格 的 键 值 ， 那 么 让 A$ 等 于 空格 如果 输 入 的 键 值 大 于 “一 ”的 
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键 值 ， 那 么 就 是 日 文 假名 ， 在 屏幕 上 显示 “CANA?” 字 样 ， 中 文 意思 是 “假名 ”。 并 让 AS$ 等 于 空 
格 。 从 370 语句 的 子 程序 返回 后 ， 再 次 交换 A$ 和 了 B$ ， 然 后 判断 A$ 是 否 等 于 B$ ， 如 果 相 等 ， 
令 I=J 王 500， 跳 出 循环 体 。 
第 230 语句 判断 循环 控制 变量 I 是 否 大 于 100, 若 I 之 100， 则 输入 的 字符 是 正确 的 ， 令 开 =K 
十 1， 记 录 正 确 输入 的 字符 个 数 ， 返 回 到 140 语句 继续 进行 。 
第 240 语句 是 当 双 重 循环 结束 ， 时 间 已 用 完 ，I<100， 则 在 屏幕 上 显示 K 值 。 第 250 语句 显 
示 “TRY A 一 GAIN? ”字样 ， 意 为 “再 试 吗 ?”， 等 待 从 键盘 输入 指示 ， 如 果 输 入 非 “N?” 字 符 ,， 则 
游戏 重新 开始 ， 如 果 输 入 “N?” 则 游戏 结束 。 
第 240 句 中 的 “RIGHT NO。”， 意 思 是 答对 的 个 数 。 
由 于 把 部 分 假名 内 码 改 成 了 英文 小 写字 母 的 内 码 ， 所 以 不 是 所 有 的 假名 都 能 显示 出 来 。 
改动 第 140 语句 中 的 RND 〈X) 中 的 数值 ， 可 以 限制 键盘 中 字符 的 多 少 ， 也 可 使 假名 不 显示 
出 来 。 关 于 数值 的 改动 ， 请 参见 附录 中 附 表 A。 
程序 例 6: 乌龟 
程序 清单 ， 
10 CLS，CGEN 2:， CGSET 1，2 
20 I==K，A=J，BT=5， MAX=3 
30 PP=PR: 双 = 一 1 
40 PLAY%O4T1” 
50 P$ 一 名 2D2E2F2G2A2B2C27” 
60 DIM AX (4)，AY (4)，Q (4) 
70 DIMP (5，1)7 C (5) 
80_ INPUT"PEOPLES"，PL 
90 IF PL=0OR PL>5THEN PLAY'C1CC"，CLS，GOTO 80 
100 VIEW 
110 LOCATE 13，0: PRINT2TOR.” 
120 LOCATE 13，2: PRINTYMUL.” 
130 FOR I=0TO4 
140 Q (TD) =RND (MAX) 十 BT 
150 C GD) =MAX 二 BT 一 Q (TD) 
160 DEF SPRITE I，(0，1，0，0，0) =CHRS$ (184) 十 CHRS$ (185) 十 CHR$ (186) 十 
CHR$ (187) 
170 LOCATE 17 十 2* I，0:， PRINTI 二 1 
180 LOCATE 17 十 2 * I，2:， PRINT:C (DT) 
190 AX (I) 一 220 
200 P (I，0) = 一 1 
210 NEXT 
220 
230 FOR I=0TOPL--1 
240 LOCATE 0，21: PRINT I 十 1;"PLAYER NO。" 
250 _ INPUTITOR.NO. ?"，M 
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260 IF M=0OR M>5 THEN PLAY'C1CC":， GOTO 240 
270 P (I，0) =M 一 1 
280 NEXT 
290 FOR M=4TO 20: LOCATE 3，M:， PRINT CHR $ 《238): NEXT 
300 FOR M=0TO 4: LOCATE 25，6 十 3x M; PRINT M 二 1: NEXT 
昌 0i 
320 SPRINT ON 
330 FOR I=0TO14 
340 A=RND (RND (Q (D)) 
350 AY (GD 一 71 十 24xI 
360 AX (D) =AX (D 一 Ax2 
370 IF AX (D <OTHEN AX (D =0 
380 PLAY MID$ (P$，Ax2 二 1，2) 
390 SPRITE I，AX (D)，AY (IT) 
400 TIF AX (D) <50 THEN GOSUB 560 
410 NEXT 
420 开 =K 十 1 
430 IF K 一 20 OR K 一 50 THEN GOSUB 450 
440 GOTO 310 
45022 
460 FOR I=0TO 14 
470 LOCATE 10，10: PRINTCHANGEI" 
480 ，A=RND (8) 
490 IF A=7THEN Q (1) =9: GOTO 530 
500 JIF A=6THEN IF RND (5) =4THEN Q (D =0: GOTO 530 
510 IF A<5 THEN 530 
520 Q (GD =11--Q GOD 
530 NEXT 
540 LOCATE 10，10: PRINT“ 
550 RETURN 
560 
570 IF I=W THEN RETURN 
580 IFEW(》-1THEN 600 
590 W=I:， RETURN 
600 “ 
610 PLAY"T6CEDFEGC2T1/ 
620 LOCATE 10，6: PRINTWIN" 到 十 1 一 IT 二 1 
630 SPRITE OFF 
640 FOR J=0TOPL-1 
650 PR=0 
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660 IFP (J，0) 一 W THEN PR 
670 IFEP (J，0) =ITHEN PR 


680 PP 


1 


PRxC (P (J，0)) 


690 LOCATE 9， 


9 十 Jx 2:， PRINT J 十 1; NO.” PP; "SCORE"” 


700 P (J，1) =P (J，1) 十 PP 


710 NEXTI 


5: A$=INKEY$ (0) 


22:， PRINT "TRY AGAIN?” 


720 LOCATE 16， 


一 "NTHEN 750 


730 IFASY 
740 人 了 UN 


10，PRINT" 一 一 一 一 一 END 一 一 一 一 一 "PLAY"CDGAC"，END 


750 ee LOCATE 5， 


10 1 12 13 1 15 16 17 18 1l19 20 2 22 23 24 25 26 27 


- 主人 人 于 全 
&> 嘲 
国生 目 国 国生 看 况 加 放 同业 全 同时 大 辣 全 上 目 
四 四 目 四 四 国生 加 全 放 可 因 加 加 遇 加 全 上 目 
3 
3 
上 四国 目 国 国 辣 是 加 辣 硬 轩 问 量 国 站 古国 加 四 四 


198168 己 已 | 己 己 
中 闻 | 四 | 到 司 司 | 只 SN 局 


| 与 | 司 
站 
国明 国生 目 四 上 昌国 国 目 四 四 国 上 
ee 
时 
国 因 目 国 国 国生 加 粳 全 同 量 加 装 轩 轴 加 加 四 
国 E 上 上 有 轴 四 四 轴 国 目 国 上 克利 卜 目 
上 本国 四 辐 国 目 相 
目 国 国 国 目 国 国民 
和 
3 
目 国 昌国 国 辣 可 本 辣 加 全 同时 全 由 遇 四 是 
EN SS 
叫 4 
国 区 目 国外 轴 各 加 全 辐 尖 全 加 时 加 全 上 目 
和 
3 
四 因 目 国 国 辣 古 加 辣 加 全 加 时 全 四 遇 畏 占 量 四 
叫 
国生 昌国 四 生生 加 全 放 本 加 全 辣 轩 而 加 生 上 目 
|S 
ip | 
国 国 站 国 国 辣 二 加 辣 大 国 国 量 国 占 明 加 癌症 
| 
叶 |n 
| 
SS 
Lp 
国 国 四 国 四 国生 全 加 加 量 国 加 轩 大 问 上 国 上 
如 | 如 
四 加 
要 4 本 
四 加 
| 吧 | 
时 
| 因 站 而 硬 四 而 本 站 而 国 问 遇 加 回国 


2 
3 
国 国 四 国 国 交加 全 回 加 全 而 加 加 轩 全 本 国 目 


口 玫 amwmomweer mao 
人 


ee 冲 向 终点 目标 ， 虽 然 倍 率 低 的 乌龟 是 优胜 的 候选 者 ， 但 有 时 也 会 出 现 反 败 为 
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(游戏 方法 

可 能 5 人 一 起 玩 。 首 先 要 决定 几 个 人 玩 ， 猜 测 哪个 乌龟 会 最 先 到 达 终 点 ， 如 果 猜 测 正确 ， 则 
根据 其 倍数 率 得 分 ,执行 中 所 显示 的 “CHANGE?” 是 为 使 游戏 更 有 趣 和 表示 内 部 顺 时 针 更 动 的 信 
号 。 
程序 例 6 分 析 : 

这 是 一 个 乌龟 赛跑 的 游戏 。 乌 龟 运 动 的 速度 是 由 第 四 章 中 介绍 的 随机 函数 产生 的 ， 因 此 是 随 
机 的 ， 即 不 断 变化 的 ， 且 不 可 预先 知道 。 程 序 开 始 ， 首 先 向 游戏 者 询问 有 几 个 人 参加 〈 最 多 5 个 
人 ),， 然 后 在 屏幕 右上 角 显 示 乌 龟 的 号 码 和 它们 的 倍率 。 在 屏幕 的 左下 角 显 示 游 戏 者 的 号 码 ， 并 等 
待 游戏 者 从 键盘 输入 所 猜测 的 将 取胜 的 乌龟 的 号 码 。 待 参赛 的 游戏 者 都 输入 完毕 ， 游 戏 开 始 。 倍 
率 低 的 乌龟 取胜 的 可 能 性 最 大 ， 因 为 乌龟 运动 的 速度 是 由 随机 函数 产生 的 ， 因 此 也 只 能 说 可 能 性 
最 大 ， 而 不 是 倍率 低 的 乌龟 必然 取胜 。 游 戏 过 程 中 有 时 屏幕 中 央 出 现 “CHANGE?” 字 样 ， 中 文 意 
思 是 “改变 ”， 此 时 ， 控 制 乌龟 运动 速度 的 变量 就 改变 了 ， 这 就 使 得 结果 变 得 更 加 捉摸 不 定 ， 游 戏 
更 加 有 趣 。 

程序 第 80 行 中 的 “PEOPLES?” 意 为 “ 几 个 人 ”， 用 于 向 游戏 者 询问 有 几 个 人 参加 游戏 。 

程序 第 110 语句 和 第 120 语句 中 “TOR. ”和 “MUL. ”。 意 为 “乌龟 ”和 “倍率 ”， 这 两 个 字 
出 在 屏幕 右上 角 ， 用 于 表示 乌龟 的 号 码 和 它们 的 倍率 ， 供 游戏 者 猜测 时 参考 。 

程序 第 240 语句 和 第 250 语句 中 的 “PLAYER NO: ”和 : TOR.NO. ?”。 意 为 游戏 者 号 码 和 
乌龟 号 码 。 这 两 个 字 出 现在 屏幕 左下 角 ， 游戏 者 号 码 由 程序 自动 给 出 ， 乌龟 号 码 由 游戏 者 参考 屏 
幕 右上 角 乌 龟 的 倍率 输入 。 

程序 第 690 语句 中 的 “NO. ”和 “SCORE”， 意 为 “第 只 ”和 “得 分 ”。 供 游戏 结束 时 显示 
每 只 乌龟 的 得 分 。 

整个 程序 分 为 五 个 部 分 : 

第 一 部 分 从 第 80 语句 一 210 语句 ， 这 部 分 程序 的 作用 是 提示 游戏 者 输入 参加 游戏 的 人 数 ， 产 

生 每 只 乌龟 的 速度 控制 变量 Q_ (I) 和 倍率 C (TD), 并 在 屏幕 右上 和 角 显 示 乌 龟 号 码 和 它们 的 倍率 。 第 
190 语句 令 每 只 乌龟 的 X 座 标 均 为 220， 即 程序 开始 时 ， 使 乌龟 出 现在 起 跑 线 上 。 

第 二 部 分 从 第 230 语句 一 第 300 语句 ， 这 部 分 程序 的 作用 是 显示 参赛 的 游戏 选手 号 吗 ， 等 待 
游戏 选手 从 键盘 输入 所 猜测 的 乌龟 的 号 码 ， 并 记忆 于 了 数组 中 。 第 290 和 300 语句 分 别 用 于 显示 
终点 线 和 起 跑 线 处 乌龟 的 号 码 。 

第 三 部 分 从 第 320 语句 一 第 440 语句 ， 这 部 分 程序 的 作用 是 控制 乌龟 的 运动 。 这 是 一 个 循环 
程序 ,循环 控制 变量 I 从 0 一 4, 每 次 控制 一 只 乌龟 〈 第 工具 乌龟 ) 的 运动 。 乌 龟 运 动 的 速度 是 由 第 
340 语句 中 所 产生 的 A 来 控制 的 。 A 是 由 随机 函数 产生 的 ， 乌龟 的 速度 控制 变量 Q (D 越 大 ，A 
的 取 值 范围 就 越 大 , 最 终 从 总 体 效 果 来 看 , 第 工具 乌龟 运动 速度 快 的 可 能 性 就 大 , 也 就 是 取胜 的 可 
能 性 应 越 大 。 第 430 语句 使 上 面 的 循环 每 进行 20 次 或 50 次 ， 调 用 以 450 语句 开头 的 子 程序 改变 
每 只 乌龟 的 速度 控制 变量 Q_ (ID), 增加 游戏 的 趣味 性 。 第 400 语句 判断 是 否 有 乌龟 到 达 终 点 , 若 有 ， 
则 调用 以 560 语句 开始 的 子 程序 ， 判 断 游戏 是 否 结束 。 

第 四 部 分 是 从 450 语 句 一 550 语句 的 子 程序 ， 它 的 作用 是 在 游戏 过 程 中 在 屏幕 中 央 显 示 出 
“CHANGE”” 字 样 ， 然 后 改变 每 只 乌龟 的 速度 控制 变量 Q_ (IT) 。 

第 五 部 分 是 从 560 语句 一 750 语句 的 子 程序 , 它 的 作用 是 判断 游戏 结束 , 在 屏幕 上 显示 得 胜 的 
乌龟 的 号 码 和 每 只 乌龟 的 得 分 。 
第 570 语句 一 第 590 语句 判断 游戏 是 否 结束 , 程序 开始 时 第 30 语句 给 W 赋值 为 一 1, 当 第 一 
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只 乌龟 到 达 终 点 时 ， 在 第 590 语句 到 =I， 用 观 记忆 第 一 个 到 达 终 点 的 乌龟 的 号 码 。 当 第 2 只 乌 
龟 到 达 终 点 时 ,在 第 570 语句 判断 如 果 I 夫 琅 代 是 第 二 个 到 达 终 点 的 乌龟 的 号 码 ，W 是 第 一 个 到 
达 终 点 的 乌龟 的 号 码 ， 所 以 I 夫 到)， 则 在 第 580 语句 跳 到 第 600 语句 进行 结束 处 理 。 

第 620 语句 使 屏幕 出 现 “WIN” 字 样 〈 意 “ 赢 >” 和 第 一 个 ， 第 二 个 到 达 终 点 的 乌龟 的 号 码 。 
第 640 语句 一 第 710 语句 用 于 显示 每 位 选手 的 得 分 。 得 分 以 倍率 乘 上 一 个 系数 而 计算 ， 第 一 名 系 
数 为 2， 第 二 名 系数 为 1， 其 它 名 次 系数 为 0。 

第 720 一 730 语句 向 游戏 者 询问 是 否 继续 重新 开始 ， 屏 幕 上 显示 “TRY AGAN?” 字 样 ， 意 思 
是 “ 重 来 吗 ?” 如 果 键 入 “N?”， 则 游戏 结束 。 键 入 非 “N?” 的 任何 键 ， 则 游戏 重新 开始 。 
程序 例 7: 纸牌 
程序 清单 ; 
10.VIEW:，CGEN 3: CGSET 1，1: SPEITE ON 
20 I 王 本 A 一 C: S 王 人 下: 义 王 一 1: YY 三 一 1! ED 王 P， CX 一 久 Y T0O 王 工 1; TTIT=0 
30， NS$ = 一 CHRS$ (254): NS$=NS+TNS+TNST+TNS$: M0$=CHR$ (243) 十 CHR 
$ (247): M1$ 王 CHRS$ (245) 十 CHRS$ (248) 
40 DIMD (5，5)，PT (17)，PR (1) 
50 FOR I=0TO 5: FOR J=0TO 5: LOCATE TIx4 十 1, Jx 3 十 1:， PRINT M0$ ， LOCATE 
Tx 4 十 1，Jx 3 十 2， PRINT M1$ 
60 A=RND (18): IF PT (A) 王 2 THEN 60 
70 D (IJ) =A:，PT (A) =PT (A) 十 1，NEXT:， NEXT 
80，PALETS 0, 13, &H12, &H22, 2:PALETS 1, 13, &KH14, &H24, 4: PALETS 2, 13: &H16， 
&H26，6: PALETS 3，13，2，25，&H36 re 
90 DEF SPRITE 0，(3，1，0，0，0) =NJ$ : DEF SPRITE 5，(3，1，0，0，0) 一 NS$ 
100 LOCATE 25，9:，PRINTIL.": LOCATE 25，12: PRINT7R.” 
110 SPRITE 0，CX* 32 十 24，CY* 24 十 31: T0= 一 1: T1= 一 1:TT=7: GOSUB 170: SWAP 
TO TI14 X=CXT Y=CYTT 三 6 GOSUBi70 
120 IF To<>T1I THEN 150 
130 PLAY'T204C1E1G105C6":， ED=ED 二 1: IF ED=18 THEN 300 
140 PR (P) 王 PR (P) 十 10: LOCATE 23，10 二 P* 3: PRINT PR (P): SPRITE 6: SPRITE 
752GOTO 110 
150 PLAY"'O1IT2D5E5C5" 
160 D (X，Y) =Tl: D (CX，CY) =T0: LOCATE CX* 4 十 1，CY* 3 十 1， PRINT M0$ ， 
LOCATE CXx 4 十 1，CY* 3 十 2; PRINT M194 ， LOCATE Xx 4 十 1，Yx 3 十 1，PRINTM0$ : 
LOCATE Xx 4 十 1，Yx 3 十 2， PRINT M1$ : P=1 一 P: GOTO 110 
170 SPRITE 5，216，9%5 十 24x*P: PAUSE 10:， SPRITE 5: S=STICK (P) T=STRIG (P) 
180 IFRS=1THEN CX 王 CX 二 1: IF CX>5THEN CX=0 
190 IF S=2 THEN CX=CX 一 1，IF CX<0O THEN CX=5 
200 IF S=4THEN CY=CY 二 1: IF CY>5THEN CY=0 
210.. IF S=8 THEN CY=CY 一 1; IF CY<0OTHEN CY=-5 
220 IF S=0THEN 240 
230 SPRITE 0，CXx 32 十 24，CYx* 24 十 31 
240 IFT<8THEN 170 
250 :SWAP 万 54CX GY7 TO 
260 IF To= 一 1THEN SWAP D (CX，CY)，T0: GOTO 170 
270 SPRITE 0:, PLAY"O5T1C1C1", PAUSE 10:LOCATE CX x* 4 十 1, CY* 3 十 1: PRINT7 ”; 
LOCATE CXx 4 十 1，CYx 3 十 2: PRINT”“ 
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280 DEF SPEITE TT，(T0/6，1，1，0，0) 一 CHR $ 〈48 十 T0 一 TO0/6* 6): SPRITE 工 工 六 CX 
x 32 十 24，CY * 24 十 31 

290 RETURN 

300，PRINT7TRY AGAIN !7 

310 工 =STRIG (0): 下 工 =0THEN 310 

320 IFT=1THEN RUN 

330 IFT=2THEN END 

340 GOTO 300 

350- END 


量 辐 晤 盟 名 加 加 加 相让 下 | K72 人 3 
: |ks| |] jkszjkez| | | | |K62|K62| | |K62|K62 K62| K62 Ks2| | -| 二 | 
|sz | kezjk62| | Kez| [gsz|xez | Kez|Kez| | |kszjkez| | [ke | | | 
4 |K42|K52|K52|K32|K42|K52|K52|K32| 上 | K42|K52|K52|K32|K42 上 一 
5 |ke2| | |K6z|kez| | |K62| | |kszjkez| | K62| | “|Ksz|kez| |  jkszl | | -| | 
| | |K62|K62| K62 [ | ke | | | 
|K52|K32|K42] 人 | K32|K42|K52 | 水 42|K52|K52|k3z| | | | 
。 [ksz| | |ksz|kez| | |Ksz| |K6z2| K62 |K62| [kezjkszl| | |ktzl| | | | | 
io Ke 中 | ke2|k6z| | |K62| [62|K62| | Kez|Ke2 | |K6z|xsj | kt | | | 
1 |K42|K52|K52|K32|K42|K52 瑟 各 | |K52|K52|K32|K42|K52|K52|K32|Kd42]K52|K52jK32|F72| | | | 
i2 |Kksz| | kezjksz| | | 必 到 上 
13 加 到 丽人 和 E 62| 本 
于 的 于 生计 放 玫 各 二 出 二 二 二 业 三 三 二 
15 |K62| | |Ks2z|K6z| | |K6z| EB 国 四 | ks2 
生生 二 二 全 全 本 二 
1 42|K52| |K52| [K52|Ks2|K32|K42|K52|K52|K32|K42| |K42|K52|K52 三 习 
20 |K62| | |K62jKez| |K62| Ke2| | | |K62|K62 朴 | 
| 2 K52|L22| LI12|K52|K52| L22|L12|K52|K52|Lz2| | |， | | 
二 主 陋 晤 面 四 属 本 本 基 机 到 县 则 本 贡 呈 大 页 柄 可 病 林 攻 汪 区 汪汪 拓 | 一人 一 
必 | 让 汪汪 册 [L 


《纸牌 
玩 纸牌 的 关键 要 么 完全 记 住 翻 过 去 的 扑克 的 数码 和 花色 ， 要 么 赁 第 六 感 观 去 取胜 ， 你 属于 哪 
一 类 型 ? 

“游戏 玩 游 》 

2 人 玩 。 以 操纵 器 十 字 按 钮 来 选择 纸牌 , 以 A 按钮 来 翻 牌 , 若 翻 开 2 张 纸 牌 皆 为 同样 花色 、 同 
样 数字 ， 则 猜 中 了 ， 可 继续 翻 纸牌 。 翻 错 了 的 话 则 换 对 方 玩 


四 g 凶 办 办 办 
四 加 罗 因 加 
因 罗 加 罗 轩 加 
办 办 只 四 
因 罗 四 人 四 四 加 
办 因 四 轿 六 交 
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程序 例 7 分 析 

此 程序 是 翻 纸牌 游戏 。 两 人 玩 , 用 操纵 器 十 字 按键 移动 光标 来 选择 纸牌 , 用 A 按钮 来 翻 牌 。 游 
戏 开 始 ， 屏 幕 上 出 现 36 张 纸 牌 的 背面 ， 游 戏 者 翻 开 两 张 后 ， 若 花色 号 码 相 同 ， 计 分 加 10， 可 继 
续 翻 ， 且 所 翻 的 两 张 纸牌 在 屏幕 上 消失 ; 若 花色 号 码 不 相同 ， 则 恢复 成 纸牌 的 背面 ， 此 时 ， 记 忆 
力 好 的 游戏 者 应 记 住 此 位 置 下 纸牌 的 花色 号 码 ， 以 便 下 次 轮 到 游戏 时 ， 可 以 准确 地 翻 出 两 张 相同 
的 纸牌 。 纸 牌 翻 完 后 ， 两 人 以 屏幕 右 方 显 示 的 得 分 计 胜 负 。 

首先 解释 一 下 第 20 一 40 语句 定义 的 变量 和 数组 的 程序 中 的 用 途 。 

第 20 语句 定义 的 变量 X，Y 和 CX，CY 用 于 表示 纸牌 的 座 标 。ED 用 于 记录 已 经 翻 对 过 的 纸 
牌 的 对 数 , 如 果 ED 王 18, 游戏 则 结束 了 。 变量 P 等 于 0 或 1 控制 有 效 的 操纵 器 是 1 号 、 还 是 2 号。 

第 30 语句 定义 的 字符 串 变 量 N $ ， 用 来 定义 卡通 0 和 卡通 5， 它 们 分 别 用 于 选择 纸牌 用 的 光 
标 和 在 屏幕 右 方 显示 左 或 右 操纵 器 有 效 的 光标 。M0$ 和 MI1$ 用 来 拼 出 纸牌 背面 的 图 案 。 

第 40 语句 定义 和 数组 D (5, 5) 是 一 个 6X6 的 数组 , 用 来 记忆 36 张 纸牌 的 花色 号 码 。 第 50 一 
70 语句 程序 自动 给 纸牌 赋值 时 ，PT (17) 数组 用 于 控制 相同 纸牌 只 能 有 两 张 。PR 〈1) 数组 有 两 
个 元 素 ，PR 〈0) 用 来 记录 操纵 器 1 的 得 分 ，PR 〈1) 用 来 记录 操纵 器 2 的 得 分 。 

第 50 一 70 语句 用 于 给 纸牌 赋值 ， 使 用 PT 数组 控制 相同 号 码 的 纸牌 只 能 有 两 张 。 同 时 ， 本 段 
程序 使 屏幕 上 出 现 36 张 纸牌 的 背面 图 案 。 

第 90 语句 定义 卡通 0 和 卡通 5 两 个 光标 。 

第 100 语句 在 36 张 纸牌 右 方 屏幕 中 央 显 示 “L. ”和 “R. ”字样 〈“ 左 ”“ 右 ”) ， 当 光标 在 
“L. ”右边 闪烁 时 ，1 号 操纵 器 有 效 ; 当 光标 “R. ”右边 闪烁 时 ，2 号 操纵 器 有 效 。 

从 第 110 语句 开始 到 第 160 语句 的 循环 体 是 程序 的 主体 , 控制 着 1 号 、2 号 操纵 器 的 选 牌 、 翻 
牌 、 判 断 所 翻 的 两 张 牌 是 否 一 样 、 计 算得 分 和 游戏 是 否 结束 。 

第 110 语句 的 作用 是 两 次 翻 纸牌 。 

开始 时 使 光标 出 现在 CX，CY 所 指示 的 纸牌 的 位 置 ， 令 T0=T1= 一 1，TT=7， 调 用 170 语 
句 的 子 程序 。 

第 170 语句 的 子 程序 ， 根 据 十 字 按 键 输入 的 方位 代码 来 调整 光标 的 座 标 CX，CY， 移 动 光标 
选 牌 ， 如 果 A 按钮 按 下 则 将 该 张 纸牌 翻 过 来 。 

第 一 次 调用 170 语句 的 子 程序 时 ， 将 所 选择 的 纸牌 的 号 码 在 250 语句 交换 给 了 T0， 并 于 第 
270，280 语句 在 CX，CY 所 代表 的 位 置 将 纸牌 翻 开 。 

从 子 程序 返回 后 ,交换 T0 和 T1, 这 样 所 翻 开 的 第 一 张 纸牌 的 号 码 就 交换 给 了 T1， 而 T0= 
一 1， 然 后 再 用 X，Y 记 下 第 一 张 纸 牌 的 位 置 座 标 CX，CY 记录 下 来 。 

再 调用 170 语句 的 子 程序 时 , 第 250 语句 又 将 所 翻 开 的 第 2 张 纸牌 的 号 码 交 换 给 T0,， 并 于 第 
270，280 语句 翻 开 第 2 张 纸牌 。 

此 时 ， 经 过 两 次 调用 170 语句 的 子 程序 ， 使 两 张 纸牌 的 号 码 已 分 别 记 于 T1 和 工 0， 两 张 纸牌 
的 位 置 座 标 分 别 记 于 (X，Y) 和 (CX，CY)。 

另外 ， 第 260 语句 是 对 两 次 翻 同 一 张 纸牌 或 在 纸牌 已 消失 的 地 方 翻 牌 的 处 理 。 

在 两 张 纸牌 都 翻 过 后 ， 第 120 语句 判 断 两 张 牌 的 号 码 是 否 相 同 。 如 果 相 同 ， 首 先 再 判断 是 不 
是 所 有 纸牌 都 翻 完了 (ED=18)， 若 都 翻 完 了 ， 则 游戏 结束 了 。 然 后 给 游戏 者 加 分 ， 并 显示 出 来 ， 
最 后 使 翻 过 的 两 张 纸牌 消失 。 

当 两 张 纸牌 不 相同 时 ,恢复 两 张 纸牌 的 号 码 ,， 恢复 纸牌 背面 的 图 案 , 换 另 一 个 操纵 器 来 选 牌 ， 
这 些 处 理 是 由 第 160 语句 完成 的 。 
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第 300 语句 以 后 是 结束 处 理 。 
第 300 语句 在 屏幕 上 显示 “TRY AGAIN1I1!”( 意 “再 试 1”) 字样 。 
然后 等 待 从 操纵 器 输入 指令 : 按 START 则 游戏 重新 开始 ; 按 SELECT 键 则 游戏 结束 。 
程序 例 8，SCR $ 指令 应 用 例 
程序 清单 , 
10 VIEW 
20 PLAY'O4C1D1A1G1E1B” 
30 SPRITE ON 
40 CGSET 1，0 
50  PX 一 50，PY=56， MX 一 190， MY 一 150， DEF MOVE (0) =SPRITE (4，D，1，1，0， 
0)， POSITION 0，PX，PY 
60 DX=PX 一 MX: DY=PY 一 MY 
70 IF ABS (DX) <8 AND ABS (DY) <8THEN 360 
80 S1 一 一 1x (DX>0) 一 2* (DX<0): S2 王 一 4x* (DY>0) 一 8x* (DY 一 0) 
90 IF ABS (DX) <ABS (DY) THEN SWAP S1，S2 
100 S=S1:， GOSUB 270， GOSUB 290 
110 IF D<<>0THEN 140 
120 SWAP S1，S2:, S=S1:, GOSUB 270， GOSUB 290 
130 IF D=0TNEN 160 
140 DEF MOVE (1) =SPRITE (11，D，1，3，0，0):， POSITION 1，MX，MY 
150 MOVE 1: PIAY"O1 C1 C1 Cl 
160 SO0=STICK (0) 
170 .S=S0,， GOSUB 280， GOSUB 290 
180 IF D=0THEN 250 
190 DEF MOVE (0) =SPRITE (4，D，1，3，0，0) 
200 POSITION 0，PX，PY 
210 MOVE0:， PIAY?"O3B1D1” 
220 XX= (PX 十 7) /8 一 2， YY= (PY 二 7) /8 一 3 
230 IF SCR$ (XX，YY) =CHRS$ (199) THEN LOCATE XX，YY: PRINT"” ,CN 一 CN 
十 1，LOCATE 10，23: PRINT'SCORE"， CN;: PLAY"O4 C1 Al G1 
240 IF MOVE (0) = 一 1OR MOVE (1) = 一 1THEN 240 
250 PX 一 XPOS (0) 王 ， PY 王 YPOS (0)， MX=XPOS (1)， MY=YPOS (1) 
260 GOTO 60 
270 X 王 MX 一 (S=1) x4 十 (S=2) *4:; Y=MY 一 (S=4) x4 十 (S=8) x*4，RETUN 
280 X=PX 一 (S==1) x4 十 (S 一 2) x4: Y 一 PY 一 (S=4) x* 4 十 (S=8) x4:， RETURN 
290 Cl1= (X 一 1) /8 一 2:; LI= 〈(Y 一 1) /8 一 3 
300 C2=X 十 16: C2= 〈C2 一 1) /8 一 2: L2=Y 十 16: L2= (L2 一 1) /8 一 3 
310 D= 一 3x (S=1) 3x* (SCR$C2，L1) =” 7) x (SCRS$ (C2，L2) 一 ” 少 


320 D=D 一 7x (S 王 2) xSCR$ (C1，L1) =” 7) x (SCRV$ (C1，L2) 王 ” 人 
330 D=D 一 1x (S=8) xSCRS$ (C1，L1) =” 7”) x (SCRSV$ (C2，L1) 一 ” 人 
340 D=D 一 5x (S=4) *SCR$ (Cl1，L2) 一 ”7 * (SCR$ (C2，L2) =” 
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350 RETURN 

360 PLAY'"O4 G1 C1 G]H: FOR Q=0TO 3: CGSETO，0: CGSET1，1: CGSET0，0: NEXT 
370 PLAY'"O1L El1G1A1 CEHD1，CLS:，SPRITE OFF 

380 LOCATE .5 多 10=PRINTE 一 一 一 一 一 一 再 N 有 二 过 天 “: END 
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〈 本 例 是 使 用 SCR $ 的 例题 》 (并 非 是 游戏 ) 

“请 先 描绘 背景 再 执行 

. 以 | 一 | 天 | 寺 y 键 操纵 企鹅 

。 当 小 妖怪 近 企鹅 时 ;企鹅 想 顺利 地 逃脱 并 通过 有 旗子 的 地 方 。 

。 经 过 旗子 时 ， 操 纵 企 鹅 的 中 央 部 位 ， 使 其 和 旗子 的 上 部 重合 。 

。 马 龟 或 妖怪 一 旦 磁 到 砖头 ， 就 不 会 向 前 走 了 。 

在 BG 绘图 程序 的 情况 下 ， 可 以 改变 砖头 或 旗子 的 位 置 ， 或 者 变更 符号 ， 变 更 各 种 样式 。 
程序 例 8 分 析 : 


可 叫 了 可 本 
民 ] Co 局 3 
蛋 局 局 忆 

可 串 

要 | Co 

9 
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这 是 一 个 练习 SCR $ 指令 的 例子 .屏幕 的 背景 上 有 砖 墙 和 小 旗 了 ， 在 程序 的 控制 站 小 妖怪 总 
是 企图 靠近 企鹅 ， 企 鹅 在 操纵 器 的 控制 下 躲避 小 妖怪 ,并 去 拔 小 旗 。 无 论 是 企鹅 还 是 小 妖怪 ， 前 
进 时 碰 到 砖 墙 就 必须 改变 前 进 方向 ， 才 能 继续 运动 。 小 妖怪 若 撞 上 上 企鹅， 游戏 就 结束 了 。 

第 50 语句 定义 变量 。(PX，PY) 是 企鹅 的 座 标 ，(MX， MY) 是 小 妖怪 的 座 标 。 

程序 从 第 60 一 150 语句 ， 可 分 为 两 部 分 。 

第 一 部 分 为 60 一 150 语句 ， 控 制 小 妖怪 的 运动 。 

在 第 60 语句 中 令 DX=PX 一 MX, 即 企鹅 的 'X 座 标 减 去 小 妖怪 的 X 座 标 ; DY=PY 一 MY, 即 
企鹅 的 YY 座 标 减 去 小 妖怪 的 Y 座 标 。 根 据 DX、DY 在 第 90 语句 判断 企 匆 和 小 妖怪 是 否 擅 上 ， 若 
撞 上 ， 则 跳 转 到 到 第 360 语句 ， 游 戏 结束 。 

第 80 一 100 语句 根据 企鹅 与 小 妖怪 的 相对 位 置 , 控制 小 妖怪 的 运动 方向 , 令 小 妖怪 追赶 企鹅 。 

第 80 语句 根据 DX 大 或 小 于 零 , 得 到 控制 小 妖怪 向 左 或 向 右 运 动 的 控制 变量 S1, 同样 道理 根 
据 DY 得 到 控制 小 妖怪 向 上 或 向 下 运动 的 控制 变量 S2。 

第 90 语句 决定 如 果 企 鹅 与 小 妖 人 怪 在 驻 方向 上 的 距离 差 大 于 在 立方 向 上 的 距离 差 ， 则 令 小 妖 
怪 沿 广 方 向 前 进 ， 反 之 ， 则 沿 立 方向 前 进 。 

第 100 语句 调用 2 个 子 程序 来 判断 在 小 妖怪 运动 的 前 方 ， 是否 遇 到 了 砖 墙 ， 若 未 遇 到 砖 墙 则 
返回 时 得 到 一 个 方向 控制 变量 D， 这 个 方向 控制 变量 在 第 140 语句 的 DEF MOVE 指令 中 控制 小 
妖怪 运动 的 方向 。 若 遇 到 砖 墙 ， 则 返回 时 得 到 的 方向 控制 变量 D 等 于 零 。 

第 110 语句 判断 如 果 D 不 等 于 0, 即 小 妖怪 运动 的 前 方 没有 砖 墙 , 则 跳 转 到 第 140 语句 , 令 小 
妖怪 沿 D 所 规定 的 方向 前 进 。 如 果 D=0, 即 小 妖怪 运动 方向 上 遇 到 了 砖 墙 ， 则 在 第 120 语句 中 换 
一 个 方向 再 试 试 ， 如 果 返 回 的 方向 控制 变量 还 是 0， 那 么 小 妖怪 就 暂时 不 动 了 。 

第 二 部 分 是 160 一 250 语句 ， 控 制 企鹅 的 运动 。 

在 第 160 语句 首先 从 操纵 器 十 字 按 键 取得 方向 代码 S0, 然后 调用 280、 290 语句 的 于 程序， 判 
断 企鹅 运动 的 方向 上 是 否 遇 到 了 砖 墙 , 并 且 返 回 一 个 方向 控制 变量 D, 同样 , 如 果 D 等 于 0, 企鹅 
将 不 能 按照 预想 的 方向 前 进 ， 如 果 D 不 等 于 0， 第 190 到 210 语句 交 控 制 企 鹅 沿 D 所 代表 的 方向 

第 220 一 230 语句 判断 企鹅 是 否 与 小 旗子 重合 , 若 重 合 则 小 旗子 消失 , 屏幕 上 显示 企鹅 所 拔 小 
旗子 的 数量 。 : 

第 260 j 得 名 使 程序 循环 进行 。 

第 290 一 350 语句 的 子 程序 的 作用 是 将 方向 代码 S 转换 为 DEF MOVE 指令 中 的 方向 控制 变 
量 D， 并 且 判 断 在 卡通 的 运动 方向 上 是 否 碰 到 了 砖 墙 。 
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索引 一 “操作 代码 
FBASIC 除了 通常 的 操作 键 以 外 ， 更 具有 许多 容易 操作 的 字 键 功能 。 
处 理 内 容 
LINS | 状态 的 开关 


BREAK 但 在 程序 执行 中 无 效 
初始 化 “CGEN2、SPRINT OFF ， 


[CTR]+[A] 的 解除 。 
消去 一 行 


改变 光标 形状 
使 光标 回 到 左上 角 
清除 画面 

与 [ INS ] 功 能 相同 
成 为 英文 、 数 字 状态 
光标 以 后 画面 被 清除 


索引 二 ”存储 区 分 配 表 


RAM 工作 区 〈 在 主机 中 ) 


〈16 进 制 ) 
&H0000 


信 HO7FF 
&H0800 


&HIFFF 
&H2000 


信 H5FFF 
&H6000 


MH6FFF 
&H7000 


&H7000~&H703F 范围 内 请 勿 使 用 POKE 


指令 ， 它 被 使 用 于 系统 中 。 
&H703F 


RAM 工作 区 用 ， 在 BS 卡 中 


&H77FF 
&H7800 


&H7FFF 
&H8000 


&HEFFFF 
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索引 三 ”出 错 信息 一 览 表 


FBASIC 若 在 程序 执行 中 发 现 错误 , 出错 信 息 便 会 显示 于 画面 上 ,停止 程序 的 执行 变 成 等 待 指 


令 输 入 状态 。 
直接 状态 执行 中 ， 发 生 错 误会 显示 出 
-如 ?SNERROR ; 语法 错误 
程序 状态 执行 中 ， 发 生 错误 会 显示 出 ， 
如 ?SN ERROR IN 100 f 语法 错误 在 100 行 


如 果 在 程序 执行 中 出 现 错误 信息 而 不 了 解 其 原因 时 ， 请 参阅 下 表 。 


二 法 甸 训 
[RS RETORN whoutGOSUB | 元 6680B 指 令 , 有 RETURN 搬入 
[op ouwefpATA | READ 读 的 数据 未 各 于 DATA 指 Se 中 | 


切 
G) 


非法 能 订 用 
二 划 顷 果 直 过 许可 的 范 国 


| UL | Undefined line Number “| 无 GOTO、GOSUB、IF 等 指令 所 指定 的 行 号 。 
变量 下 标题 山东 而 
本 长 页 和 和 胃 


区 于 过 于 复杂 ， 俩 嫩 大多: 
本 
无 法 从 磁带 机 正确 读 写 文件 。 


索 5| 四 符号 代码 表 
下 面 的 表 A 和 表 B 给 出 了 FBASIC 的 符号 代码 ，FBASIC 中 的 指令 CHR $ (Cn) 及 ASC 
(“A$2) 的 字符 代码 转换 全 部 对 应 此 表 。 符 号 代码 表 A 和 了 的 符号 、 文 字 、 记 号 在 背景 面 或 卡 
通 面 皆 可 使 用 ， 哪 种 画面 使 用 哪 种 图 表 由 CGEN 指令 指定 。 
全 符号 代码 表 A 〈 主 要 用 于 卡通 面 ) 
请 参阅 本 书 彩 色 封底 卡通 图 案 4 角 的 10 进 制 数字 。 


4 
05 


己 
一 ”一 
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山 代 码 说 明 | 作 码 | 代 
十 六 进 制 本 sa 汪 
。 160 
81 车 161 
130 82 (左上 1) 162 
131 83 163 
上 


B0 

Bl 

B2 

B3 

B4 | 

B5 

B6 

B7 

B8 

B9 

BA 

BB 

BC 
乌 龟 
立 正 


他 符号 图 表 B (主要 用 于 背景 面 ) 
键盘 的 文字 记号 、BG 绘图 程序 所 使 用 的 符号 。0 一 31 及 184 一 255 是 背景 面 所 用 的 各 种 图 形 ， 
其 余 代 表 数 字 和 字母 符号 ， 


代 码 | 对 应 的 


进 制 十 六 进 制 六 进 制 | 符 号 


娩 


也 0 站 中 中 上 忆 一 


二 
呈 


二 


一 
kS 


13 0D (B5) 
14 0OE (B6) 
15 OF (B7) 
16 10 (CO0) 
17 11 从 于 
18 12 (C2) 
19 13 (C3) 
20 14 (C4) 


21 15 (C5) 
22 16 〈C6) 
23 17 (C7) 
24 18 (D0) 
25 19 (D17) 
26 1A (D2) 
27 1B (D3) 
28 1C (CD47 
29 1D (D5) 


D 0 DoDmD 有 和 mr 口 、 


愉 愉 多 习 疙 所 门 办 太 忆 有 口 世 必 吕 员 一 一 瑞 有 可 站 口 凤 > Be 


和 人 -~ 


 V 
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(M5) (1) 男 


(M6) (2) 


(M7) (3) 形 
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用 疮 戏 机 作曲 


用 游戏 机 作曲 目录 


一 ， 音 乐 基本 知识 


1. 音 的 高 低 民 ee 
。 


2. 音符 ………… wonsoosovesoeeessoeeoesoeessesseseosoeoeooesesesooeooesoeoeooeesooeosoesveseeooeooeoooeseesesoeoeeseoi 
35: 音 的 长 短 ee osoeovoeeseoeroneeoseeee 
4 笠 点 音符 .eve eve 
5。 休止 符 … oooossoooooseoosvoooooseooooosooosooooeooososcooooooooosooosooooooeoeosoesoooioeooeseooevesoer 


6. 升降 记 导 ………… ooooososoooooovnseosooooosoooosoooossooososoeoosesvovoroeooesooesesveeooooeeoosooeeeseooeoesoee 


7. 节拍 .拍子 和 小 闲 eeeeeeeeeeeneeseesees nes 
二 “计算 机 音乐 程序 的 写法 


i 单 部 腥 习 ee 
呈 四 
妆 曲 … oovveoeseoosoosooooooosseosooosooosoooeosoeoorecooeoooooeveoecesecooseoeieseesreroesoeeeeoereesceoe 


3. 三 部 曲 oovoososrosoeooesoesseyosssoeooeooeoesoooooeseoeeeoevcsoeve soeoeseaeeeee sevooeeoeosoeoeeoeeoesoeeeaeeeeeie 


4. 乐曲 例子 .ee 


《162) 
(162) 
(162) 
(i63) 
(163) 
(163》 
(163) 


(164) 
(167) 
(169) 
(170) 


利用 游戏 机 《普及 型 电脑 ) 的 音乐 功能 ， 可 以 帮助 我 们 学 习作 曲 和 为 曲子 配合 声 等 。 首先, 让 
我 们 回忆 一 下 音乐 的 基本 知识 〈 主 要 是 简谱 知识 )。 然 后 ， 看 看 该 怎样 把 一 首 简 谱 记录 的 曲子 输入 
到 游戏 机 中 ， 让 游戏 机 来 演奏 。 


一 、 音 乐 基 本 知识 


乐曲 都 是 由 许多 高 、 低 、 长 、 短 、 强 、 允 不 同 的 音 所 组 成 的 ， 把 这 些 音 记 录 下 来 就 是 乐谱 。 简 
谱 是 一 种 最 常见 的 记录 方法 ， 它 是 用 阿拉 伯 数 字 “1 2 3 45 6 7” 来 表示 音乐 中 的 7 个 基本 音 ， 并 
使 用 如 下 的 一 些 符号 来 表示 音 的 性 质 。 

1. 音 的 高 低 ， 

首先 介绍 两 个 名 词 ， 

(1) 音阶 一 乐音 体系 中 的 各 音 叫 做 音阶 。 

〈2) 音 列 一 乐音 体系 中 的 音 按 照 上 行 次 序 〈 即 由 低音 到 高 音 的 排列 次 序 ) 或 下 行 次 序 

排列 ， 叫 做 音 列 。 

在 简谱 中 ， 使 用 阿拉 伯 数 字 “L1 2 3 456 7” 来 表示 7 个 基本 音阶 ，7 个 基本 音阶 ,在 其 上 方 
加 点 表示 高 音 ， 下 方 加 点 表示 低音 ， 如 下 所 示 : 

| 


低音 部 中 音 部 高 音 部 
整个 音 列 范围 被 分 成 若干 个 音 部 ， 即 音 列 中 的 一 部 分 由 “1”(do) 到 上 面 的 “7”(si) 就 是 一 
个 音 部 。 

2. 音 符 
音符 是 个 别 乐 交 的 标记 ， 是 乐 晶 中 的 最 基本 的 单位 ， 以 5 音 为 例 ; 

全 音符 :5 一 一 一 十 六 分 音符 ， 5 

二 分 音符 : 5 一 三 十 二 分 音符 5 

四 分 音符 5 倚 音 音符 ， 55 

八 分 音符 : 5 震 音 音符 ， 5 
音符 有 很 多 ， 不 能 一 一 例 举 。 
3. 音 的 长 短 


我 们 知道 了 什么 是 音符 ， 还 应 该 知道 怎 梓 记 录音 符 时 值 〈 即 时间 的 长 短 ) 的 长 短 ， 在 简谱 中 
有 一 个 单纯 音符 “一 ”， 用 它 来 记录 音 的 长 短 。 它 的 用 法 有 2 种 ， 
(1) 写 在 音符 的 下 面 ， 表 示 这 个 音符 的 时 值 缩 短 为 原来 音符 时 值 的 一 半 ， 画 两 横 就 缩短 为 原 
来 音符 时 值 的 四 分 之 一 ， 以 此 类 推 。 
如 ; 四 分 音符 
八 分 音符 
十 六 分 音符 


站 《六 
届 
十 


162 


(2) 写 在 音符 右边 ， 表 示 音 符 时 值 增加 一 个 四 分 音符 时 值 的 长 度 。 
如 ; 5 四 分 音符 


5 一 ”二 分 音符 
5 一 一 一 全 音符 
4. 附 点 音符 


附 点 就 是 记 在 音符 右边 的 小 点 ,小 点 左边 的 音符 叫 符 点 音符 。 这 个 小 点 附 在 哪个 音符 的 右边 ， 
半 时 间 。 
。 一 5 十 5 5。 盖 5 十 5 
5. 
在 音乐 中 ， 有 时 需要 停顿 和 休止 ， 在 简谱 中 用 “O?” 来 表示 ， 这 个 “O” 叫 休 闭 符 。 
6. 升降 记号 
升 记 号 # ， 记 在 音符 的 前 面 ， 表 示 比 基本 音 级 高 半音 。 如 : 井 5 叫做 “ 升 5”。 
降 记 号 b: 记 在 音符 前 面 ， 表 示 比 基本 音 级 降 半 音 。 如 : b5 叫做 “ 降 5”。 
7. 节拍 、 拍 子 和 小 节 
节拍 的 作用 是 用 来 计算 音 的 长 短 。 
节拍 的 单位 是 用 固定 时 值 〈 二 分 音符 ， 四 分 音符 等 ) 来 代表 的 ， 它 由 “拍子 ”来 规定 。 拍 子 
用 分 数 作 标记 ， 分 子 说 明 每 小 节 内 单位 拍 的 数目 ， 分 母 说 明 单位 拍 的 时 值 。 
例如 : 2/4 拍 : 二 四 拍 ， 以 四 分 音符 为 一 拍 ， 每 小 节 有 二 拍 。 
3/4 拍 : 三 四 拍 ， 以 四 分 音符 为 一 拍 ， 每 小 节 有 三 拍 。 
小 节 就 是 乐曲 中 的 段落 ， 相当 于 乐谱 十 所 记载 的 由 强 拍 开始 到 了 一 -个 强 拍 为 止 的 部 分 。 用 垂 
线 做 为 划分 小 节 的 小 节 线 。 
如 ， | 5 一 5 一 | 6 一 6 一 | 
有 了 上 面 所 介绍 的 一 些 音乐 基本 知识 ， 就 知道 一 首 乐曲 是 怎样 用 简谱 记录 的 ， 并 能 够 看 懂 它 
了 。 下 面 是 大 家 所 熟悉 的 《生日 快乐 歌 》 的 简谱 。 


EX.1 生日 快乐 歌 
C 3/4 


15.5651317=-15-5651217| 


5。55311 和 614 431| 21-| 
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二 、 计 算 机 音乐 程序 写法 


单 部 曲 
在 游戏 宙 FRASIC 语言 中 ， 为 将 简谱 所 计 录 的 曲直 力 人 到 让 算 机 中 去 ,设计 了 起 新 的 代 约 。 
名 向 说 二 样 ， 它 也 能 用 米 完 整地 表示 一 首 乐 田 ， 下 面 的 表 1、 表 ?、 表 3， 就 是 这 种 代 友 与信 这 的 
以 大 东 
Eva 表 2 音阶 代码 表 3 音符 长 度 代码 
本 人 | 2 
音阶 | | | | 而 谱 | 音符 长 | 
罗 | | 记 法 | 说。 明 | 谋 代 本 
| 
es 一 一 | 三 十 二 分 音符 0 | 
| | | 。 1 十 六 分 音符 1 
[| 言 。| 附 点 十 六 分 单 符 | 2 
os34se7|| 5 | 人 分 音符 3 
Se | 0 4 
| os |1234567 四 分 音 5 
| | 。| 内 点 四 分 音符 | 6 
| oli23a6679|| | 
ee | 附 点 二 8 
0 | 全 音 9 


表 工 是 音域 代码 ， 将 整个 音 列 分 成 6 个 音 部 ， 分 别 用 00 到 05 表示 。 

表 2 是 音 险 代码， 用 字 母 及 升 记号 “ 共 ” 和 降 记 号 “b” 来 表示 音阶 。 

表 3 是 音符 长 庆 代 码 ， 甩 数字 0--9 来 表示 音 的 长 度 。 

“规则 1》 对 于 每 一 个 音 签 , 用 表 1 、 表 2、 表 3 的 代码 一 起 来 表示 ， 肽 序 是 : 音域 代码 、 音 阶 
代码 、 癌 符 长 度 代码 。 

如 : 简谱 表示 “计算 机 音乐 代码 表示 


5 . 03G4 03 表示 其 后 的 音阶 G 在 中 音 区 。 
G 是 5 的 音阶 代码 。 
4 表示 音符 长 度 为 附 点 的 1/8 音符 。 
2 O3GI 
4 GO3A5 
9 O3G5 


《规则 2》 如 果 后 面 的 音符 与 前 而 的 音符 在 园 一 音 部 中 ， 则 音域 代码 可 省 略 。 象 上 面 四 个 音符 
机 
|103 G4 GL A5 G5 | 
下 面 是 《 生 旦 快乐 歌 》 的 简谱 和 它 的 计算 机 乐谱 。 该 者 可 对 照看 : 
EX. 1 生 旦 快乐 歌 
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C 3/4 


党 人 ee 


上 人 二 全 
51004650887 全 二 人 二 让 EEC 
103G4G104G5E51C503B5A5104F4F1IE5C51D5C71 


《规则 3 如 果 后 面 音 符 与 前 面 音 符 的 音符 长 度 相同 , 则 后 面 音 符 的 音符 长 度 代码 可 以 省 去 .上 
面 的 计算 机 乐谱 又 可 简化 为 如 下 形式 : 
103G4G1A5G |04C503B7 |G4G1A5G 1|104D5C7 | 


|10o3G4G104G5E |C503BA ij|O4F4F1E5C1D5c71 
“规则 4 在 BASIC 语言 中 表示 音乐 的 指令 是 PLAY?w”, 现在 可 以 把 上 面 计算 机 乐谱 所 表示 的 
曲子 写成 BASIC 语言 的 形式 ， 输 入 到 计算 机 中 ， 并 试听 演奏 效果 了 。 
20 PLAY*DO3G4G1A5G"” 
30 PLAY“O4C5D3B7” 
40 PLAYG4G1ASG*? 
50 PLAY“O4D5C7” 
60 PLAY"O3G4G104G5Ez 
70 PLAY"C5O3BA” 
80 PLAY"O4F4FJE5C"” 
90 PLAY“D5C7" 
100 END 
在 上 面 的 程序 中 ， 我 们 没有 指定 速度 、 音 调 、 音 量 和 效果 音 ， 演 奏 出 的 效果 是 计算 机 中 初始 
设 定 的 速度 、 音 调 、 音 量 及 音色 效果 。 下 面 的 表 4、 表 5、 表 6 给 出 这 些 代码 。 


表 4 速度 代码 . 表 5 音量 代码 
速度 | 代码 | | fa | 说 明  | 

坟 史 和 MIi 表示 顿 刘 3 ，VIvV4 时 ] 
1220 | 工 | 出 只 有 短 音 效果 ， 音 量 固定 
4 一 110 工 4 

和 M0 时 为 一 般 情形 ，Vn 表示 音 
=-80 | T6 MO 人 
465 | T7? | | | 大 小 YI (小 一 V15 (大 )， 
丰 一 80 | 工 8 | 


| | 
表 4 是 速度 代码 表 ， 用 TI 一 T8 来 表示 演 秦 的 速度 ，T1 最 快 ，T8 最 慢 。 
表 5 是 音量 代码 表 。 
表 6 是 音色 效果 的 代码 表 。 其 中 的 百分数 是 指 所 输出 方 波 的 占 空 风 。 
根据 表 4 一 表 6， 我 们 把 上 面 《生日 快乐 歌 》 的 程序 加 上 第 10 语句 ， 就 可 得 到 如 下 的 完整 的 
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音乐 程序 : 
10 PLAY?M1V10Y2T4" 
20 PLAY"O3G4G1A5G"” 
30 PLAY"O4C5O3B7” 
40 PLAY"G4G1A5G"” 
50 PLAY?"O4D5C7” 
60 PLAY"D3G4G104G5E"” 
70 PLAY"C503BA"” 
80 PLAY"O4F4F1E5G" 
90 PLAY"D5C7"” 
100 END 
如 果 希 望 连 续 演 秦 上 面 的 乐曲 ， 可 以 将 100 END 语句 改 为 100 RUN， 此 时 ， 计 算 机 将 反 
复 演 奏 ， 直 到 在 键盘 上 按 Pause 键 为 止 。 
M1Vn 适合 轻快 的 乐曲 ， MOYVn 适合 舒 情歌 曲 。 通 过 反复 的 使 用 和 理解 ， 就 会 掌握 自己 所 喜 
欢 的 音色 了 。 
下 面 是 一 首 练习 曲 《小 毛驴 》 
EX. 2 小 毛 了 台 
FE 27/4 


|111.31.555。 


<n 
cn 
GD 
7 
tv 


5。014446|3333| 2222|5。51| 


CD 


| 站 


(7 
Cn 
Cn 
一 
《< 
二 
| 〇 
心 
心 


46|1333333|2223 |1 一 | 


10 PLAY"M1V14Y3T3" 
20 PLAY"DO2C3CC4E1” 
30 PLAY"G3GG4G1” 
40 PLAY?A3AAO3C” 
50 PLAY"O2G6R3" 
60 PLAY 和 F3FFA” 
70 PLAY 和 E3EEE" 
80 PLAY'D3DDDY” 
90 PLAY"G6G3" 
100 PLAY%C3CC4E1? 
110 PLAY"G3GG4G]" 
120 PLAY?A3AAO3C"” 
130 PLAY?"O2G6R3” 
140 PLAY%F3FFA” 
150 PLAY"E1EEEE3E” 
160 PLAY"D3DDE” 
170 PLAY7C7" 
180 END 
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练习 3 和 练习 4 给 出 两 首 乐曲 的 简谱 ， 请 读者 写 出 它们 的 计算 机 音乐 程序 ， 输 入 计算 机 试 奏 
出 来 。 


了 上 X. 3 梅花 
1 
| 
| 
EX.4 欢 乐 颂 
G 4/4 


1 3 3451543 2111412313。22 0| 
|3345|15432|112312，110| 
1223112 有 31l|2 了 38321125 3 
人 


2、 二 部 曲 


《规则 5》 练 习 5 是 一 首 二 部 曲 ， 二 部 曲 的 计算 机 音乐 程序 的 表达 方法 是 : 以 小 节 为 单位 ， 将 
两 声 部 的 音乐 代码 分 开 写 ， 中 间 用 冒号 隔 开 。 


EX. 5 小 乖乖 
人 


爸 G C 。 
: 1223456542753 1 


故人 
人 
几 5 相 

3 一 一 33| 4 一 一 14 有 

共和 尖 人 二 区 


10 PLAY"M0OV10Y3T4:， M0V10Y2T 忆 
20 PLAY"O2C3DFRFGAG5” 

30 PLAYT3DB5G3EO3C57 

40 PLAY"D2C3DEFGAG5” 

50 PLAYYT3DBO3DC7，R7O3C5C3C7 

60 PLAY"DO2A5AO3CO2B3A: C3C3C” 
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分 段 输入 。 


70 PLAY"G5EG7: E8O2B3A” 
80 PLAY"F5DB7: G8B3A” 
90 PLAY"G5EO3C7: G8O3C3C” 


90 


100 PLAY"D2A5AO3CO2B3A: C8C3C” 
110 PLAY"G5EG7: E8E3E” 

120 PLAYF5DBO3D: F8F5” 

130 PLAYC8R5: E8R5” 


140 END 
我 的 一 毛 钱 
34|55512|33312|322332| 
人 下 
4 5 3565312|1332210 
7 人 
中 刘 332210 
人 
00 REMMY ONE CENT” 


PLAY"M1IV10Y3T3: MI1V10Y2T3” 
PLAY"D3E3D” 

PLAY"C5CCO2E3F: O3CEG7” 
PLAY"G5GGO3C3D: O2B5BBO3C3O2B” 
PLAYE5EEC3D: O3C5CCC3O2B” 
PLAYYTE5DDE3: O3C59D2B5BR” 
PLAY"C5CCO2E3F: D3C5G7” 
PLAY"G5GGR: O2B5BBR” 
PLAY"03E3G5A3GECD: O3C3E5F3ECCO2B” 
PLAYYEEDDC5R: O3CCO2BBG5R” 
PLAY3G5A3GECD: 0O3C3E5F3ECCO2B” 


100 PLAY"EEDDC5R: O3CCO2BBG5R"” 
110 END 
《规则 6 在 BASIC 语言 的 音乐 语句 中 ， 引 号 中 的 字符 不 能 超过 31 个 ， 如 果 程 序 太 长 ， 必 须 


下 面 给 出 一 首 二 部 曲 的 乐谱 ， 请 读者 自己 试 写 出 计算 机 音乐 程序 。 
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EX 
F 4/4 
D Et 
2: 
全 且 本 本 本 
D 一 一 
5 。 5 .65 
| FM JS 
> 
| 妥 坟 宝 汪 
D 
5 。 5 6 
下 


3、 三 部 曲 


nr 0 
号 1 
和 
Le CG 
3 1 
一 
下 污 昌 
-一 一 了 
4 2 3 
ar 
入 5 
CC 
3 工 
1 ? 6 


1 心 1 一 


小 心 4c 


小 心 4 


wo 


一 看 征 一 


定 


oo On 


《规则 7》 三 部 曲 的 语法 规则 与 二 部 曲 一 样 ， 只 是 第 三 部 低音 部 的 音量 
是 国定 的 ， 由 计算 机 指定 ， 读 者 不 必 输 入 音量 代码 和 音色 效果 代码 。 


EX.8 齐 
A 4/4 

人 
3 下 和 
人 

2:2 - 
5 本 6 于 汉 
5 
ee 
2 1 机 
和 和 > 个 
5 -| 4- 一 
8 
0 
人 


101 PEM"WANG CHUEN FENG 


105 FOR N==1 TO 2 
107 PLAY7"M0V14Y3T4: MOV10Y2T4:，MQT4" 


春 风 


1 


(人 


3 


(V) 和 音色 效果 《〈Yy) 
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110 PLAY"DO2G6G3A503C: O2E6E3F5A: O1C7F" 
120 PLAY"D4E1DC3DE7: B503EC7: GAY” 
130 PLAY?%G6E3EDC5: E6C3C5C: BA 
140 PLAY"D9: 02B7G3AO3CD: G9% 

150 PLAY 宅 6G3G5E3G:，G6E3E5G:， C7G” 


1 


160 PLAY"C6D3D7: O2A6B3B7: FG 


170 PLAY: 02G603E3E5D: O03D6C3C5O02B: FG” 
180 PLAY"C9: O3E7C3O02BAG : C9" 
190 PLAY"D6D3E5D3C:，B6B303C5O2B:， G9%" 


200 PLAY"D2A5C3AO3C7: 03C5DCO2A3G: F" 


210 PLAY"D2A6O3C3D5E: O3C602A3B5O3C: E” 
220 PLAY"G9: E6G3G5F3E: D” 


230 PLAY"6G3A5G3EE: E6E3C5E3C:， C7F5G” 


240 PLAY 下 5D3CO2A7: G5GC7: C5EF7” 
250 PLAY"G6O3E3E5D: O2B693C3C502B: GG” 
260 PLAY"C9: O3E9: C9” 


270 NEXT 
280 上 ND 


下 面 给 出 一 首 三 部 昌 的 曲谱 ， 请 读者 自己 试 写 出 计算 机 音乐 程序 。 


下 X. 9 
C4/4 
5 。 4 3 5 2 | 3 
3 2 
1 
C 3 Dm 
5 和 
3 21335 |14 
1 了 让 8 6 
4. 乐曲 例子 
EX. 10 
F 4/4 
作 
人 
| < 5 |4 3 


| 二 人 3 6 


一 -- 一 


170 


余 上 
G7 汪 
人 
本 
多 有 
(07 
全 二 从 1 
小 “ 却 汪汪 44 4 3 
和 本 5 
往 事 难 启 
5 3 一 | 5 4 3 2 一 
5 3 -|54323 2? 
1 一 | 5 4 2 5 
8 


5 一 一 0 
3 一 一 0 
1 一 一 0 
臣 

1 一 一 

3 一 一 

1] 一 一 

|4321 一 | 
| 
| 43 2 1 一 | 
人 


00 REM"LONG LONG AGO"” 

10 PLAY'"MIV10Y0T3: MIV14Y2T3” 

15 FOR X=1TO 2 

20 PLAY"D3C3GCDEGEF: O3C5C3DE5E3F” 
30 PLAY'GO4CO3AGEGO4CO3G : G5A3GE7” 
40 PLAY"GBFEDGBG :， G5F3ED7” 

50 PLAYFGEDCEGE: F5E3DC7” 

60 PLAY'CGCDEGEF: C5C3DE5E3F” 

70 PLAY'GUO4CO3AGEGO4CO3G: G5A3E7” 
80 PLAY"GBFEDGED: G5F3ED5E3D” 

90 PLAY'CEGEC5R :，C7C5R” 

100 PLAY"G3BFEDGO2GO3G : G5F3ED5O2G"” 
110 PLAYFGEDCEGE: O3F5E3DC7” 

120 PLAY"GBFEDGO2GO3G : G5F3ED5OD2G” 
130 PLAYTFGEDCEGE: O3F5E3DC7” 

140 PLAY'CGCDEGEF :，C5C3DE5E3F” 

150 PLAY"GO4CO3AGLEGO4CO3G : G5A3GE7” 
160 PLAY"GBFEDGED: G5F3ED5E3D” 

170 PLAY"CEGEGC7: GC7C7” 

180 NEXT 

190 END 


| 
| 
| | ak23721|4 
| 人 
人 


00 REM'FOR ELISE” 


too 


1 cc 


]71 


10 PLAY"MIV10Y2T8: M1V10Y2T8” 

20 PLAY"O4E1 井 DE# 并 DEO3BO4DC :，R7” 

30 PLAY"D3A3R1ICEA: D2R1EARHIR3?7 

40 PLAY"B3R1E 并 GB，，RIEBR1IR37 

50 PLAY"D4C3R1O3EO4 蕊 共 D: RIEAR1R3? 
60 PLAY 并 DEO3BOD4DC:， 有 5R3? 

70 PLAY"D3A3R1O3CEA :RH1EAR1R3? 

80 PLAY"B3R1EO4CO3B:，R1IEBRLIR3” 

90 PLAY"A3RIR1O4E 失 D: RIEAR1R3"” 

100 PLAYE 并 DEO3BO4DC: R5R37 

110 PLAY"O3A3RICEA:， R1EARIR3” 

120 PLAY"B3R 1 下 并 GB: REBR1R3” 

130 PLAY"D4C3R1O3EO4 下 并 D: RIEAR1IR32 
140 PLAY 并 DEO3BO4DC:， R5R3” 

150 PLAY"D3A3RICEA :， RIEAR1R3” 

160 PLAY"B3R1EOD4CD3B: RIEBRIR3” 

170 PLAY"A3R1IR3: RIEABO3CD” 

180 PLAY"EiO4EERIR3: RIR3O2G10O3FE? 
190 PLAY"D3D1O4FEFR1IR3: R1IR3O2F1IO3ED” 
200 PLAY"D3C104EERIR3:， RIR3O2E10O3DC" 
210 PLAY2"D2PI1O3FED4ER1IO3EE:，O2B3R1O2E47 
220 PLAY DIERLO3EE 并 GEO4 并 卫 :， R1IPR57 
230 PLAYTEO3 直 DEO4 并 DRE 半 D: R3R5? 

240 PLAY 吴 并 DEO3BOD4DC :RS3R5” 

250 PLAY“O3A3RICEA:，RI1EAR1R3? 

260 PLAY BEB3R1IE##GB: RIEBR1R3” 

270 PLAY"D4aC3R1OD3EO4 瑟 共 D，RIEAR1R3” 
280 PLAY 王 #DEO3BO4DC:， R3R5” 

290 PLAY"O3A3RICEA :， RiEARIR37 

300 PLAY"B3R1ED4CO3B: RIEBR1R3? 

305 ]F X 一 1 THEN 330 

310 PLAY"A3RIR1IR3，R1EABO3CD” 

320 X=- IT， GOTQ 180 

330 了 LAY7A8” 

340 卫 ND 
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| 
王 mm PP gd- 人 一 
- 1 7 人 人: 
An Rr Am 1 
去 半生 
一 ~ | Am 4 和 Fa SS 3 
二 
0 Am 三 m | DB- 
人 4 3 6 3 |12 一 一 3 2 民 7 6 6 6 | SR 
En 可 Fm NS } FFm 1 G 
7 0 6 工 3 8 人 
Am mm 一 路 
和 证 
由 Bm < Ew 
人 
困 本 | 人 mm CD | Fm 和 
23653112321716 一 一 一 上 6 
5 本 WE 


10 PLAY"MOV14Y3T4: MOVHYI1IT4: MIT4” 

20 PLAY"QO3A6O4C2D3E5G” 

30 PLAY7A8D4C3D3A” 

40 PLAY'GSA3GE54” 

50 PLAY"D5E3DCGC5O2B” 

60 PLAY"A7R8: O2R?7E5GAB8"” 

70 PLAY"D403D38B” 

74 YY=0 

75 FOR 和 =1 TO 

80 PLAY?5A604C3C3E5G : 0O3A9: OIA3SAAAAAAA” 
90 PLAY"A8O4C3O3A: C7E: A3AAAAGFE” 

100 PLAYG6A1GE6G3: CG: GGGGGGGG” 

110 PLAY"D9: FSEDC:， DDDDDDDD” 

120 PLAY"D6E302A503C: G7F，GCGGGFED” 

130 PLAY"G6A1IGE7: E7G: GIFEEEEEEE” 

140 PLAY"D3D5C302B5B3G:， DEF:， GGGGGGGG" 

150 PLAY?A8O4C303B: CHDFEREFGAB7: AAAAAAAA"” 
160 NEXT 

170 PLAY"A6O4C3O3E5A: A6A3A5E: A3AAAAABA-” 
180 PLAY"G8A3G: D6G3G5F: GCGGGGGAG" 

190 PLAY 定 6G302A5O3E: C6G3C5C: AAAAAAAA” 


200 PLAY"D8E3D: F6F3D5D，DDDDDDDD" 

210 PLAY'C602A3A503A:，E6E3C5E， AAAAAAAAY” 
220 PLAY"G7E5E3E:;， E6E3G5G: O2CCCCCCCGC” 

230 PLAY"DDDCO2BBBG ，F6F3G6D3， DDDDGGGG” 
240 PLAY"A804C3OB:， O6E3E5C: O1AAAAAAAAY 
250 PLAY'A6O4C3OE5A:，C6E3A5E;， AAAAAAAAY 
260 PLAY"G8A3G，B6B3B6D3:， GGGGGGGGY” 

270 PLAY'E6G302A503E:， C6C3C5C:， AAAAAAAAY 
280 PLAY"D8E3D:， F6D3D5G:， DDDDDDDDY 

290 PLAY'C6O2A3A503A:， E6C3C5C:， AAAAAAAAY 
300 FLAY'G8E3G: E6E3G5G:，O2CCCCCCCCY 

305 IF Y=1THEN 340“ 

310 PLAY"A504DC603B3:， C5FEE， O1AAO2DDCCCGCCY” 
320 PLAY'A8O4C303B，C9: OIAAAAAAAY 
330Y-=1， GOTO 75 

340 PLAY"A504D，C5F: O1IAAO2DDY” 

345 PLAYC703B7.E7E:，C7O1B” 

350 PLAY4A9:， Ag9: Ag 


360 END 
了 X. 13 明 天 会 更 好 
B--C 4/4 
〔 Enm FE Enm Dm7 
0.37 上 
G7 《 王 m - G7 
| 034| 5 一 0，43。2 | 
( En 下 ( GT 
| 
区 忆 下 一 ~ C Am 人 ss PR 
| 
E Cr E Am 3 Dm 0 
| 
一 一 G 2 下 未 G 
| 二 65 5-0343| | 
C Am Em F 2 C 
| 
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Bm SS 下 Am 2 
| 7 6 |6 一 - |666 7 1 6 2 
2 c 他 汪 
| 2 5 2 3 .1|1- 一 034111 一 一 | 
CH# CH ER SGH# 
人 0 5 5 6 太 机 出 |55 2 2 
人 A 林 mm G 间 F# C## 从 扩 m 
一 | ES 昌 ( 人 We 
| 7 
下 # C 失 C 直 及 站 m DAm 心 痉 深 一 、 
古本 是 天 
C 〇 ## 人 #m FEm 下 入 CC 并 
| 和 
和 4 信 #7 F7 ， 
| 
-一 一 一 人 共计 下 十 人 本 了 C 失 
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00 REMeTOMORROW WILL BE BETTER" 
03 CLS 

04 PALETS 0，7，18，18，18 

05 LOCATE 2，9: PRINT"x TOMORROW WILL BE BETTER x” 
10 PLAY"MOV10Y1T5， MOV14Y3T5:， MO0T5" 
20 PLAY"O3EIFG8R3E1DC8R3E1F" 

30 PLAY"G7R304CO3GEIF: O1C9” 

40 PLAYEF8R3EIF，F9" 

50 PLAY"G7R3CO4C403B1: G” 

60 PLAY"A8R3E1F， Av 

70 PLAY"G7R4FIE4D1: Gy 

80 PLAY"O3C3GO4EO3GO4EO3G ，C8:C8y 
90 PLAY"O4EO3G: R3EIF，R5， 

102 PALETS 0，12，30，30，30 

106 X=0: Y=0， Z=0,， W=0 

110 PLAY"O4E303GO4EO3G:， G3GGG1G:，C5E" 
112 PLAY"O4CFDO3A:， AGF3FE1F? 

120 PLAY 虹 303GO4EO3G:， G3GE1DC3，C7" 
125 PLAY"BGO4CI1DEF，D6E1D，G” 

130 PLAY"G3CEC:，C1CC304C1C4:， O2C" 

135 PLAYFGEG:，O3B104CO3BG5R1:，O1By 


140 PLAYCFO3AO4F:， AlGFF3G1A3: A” 
145 PLAYDGDG:， G7; Gy 
150 PLAY%D3G304EO3GO4E:，O4C3C503A1IE:，O2C” 
155 PLAY'O3GO4EDO3B，GAG6: O1B" 
160 PLAY"O4E3CEO3A:，A3AG1C3D1:， A”" 
162 PLAY"O4EDCO3R:， E6D3:， Gy” 
165 1F X=1THEN 200 
170 PLAYO4C303AO4CO3A:，O4C1O3E1IE: F" 
175 PLAY"O4GEGD:，E3D5D3:，E” 
180 PLAYE303AO4F: 04D3DO3B:，D6" 
185 PLAY"D3B1O4CDEFG7R5，A5G7R5EIF:，D3CGC9” 
190 X==1，GOTO110 
200 PLAY“O3A3O4FO3AO4E:， C4C1C3E1E:，F77 
205 PLAY"O3GBGB:， E3D5A3:， F?. 
310 PLAY'O4F303GBG:， G4E1DO2GO3ED: D” 
215 PLAYO4A3GEDCDC: C9、C9r 
216 PALETS 0，10、25，25，25 
220 PLAYD3A1BO4CEO3AB: ALIAABOD4C3: Ah6” 
225 PLAY"O4CEO3ABGOSCE :，O3A1IB3BD4C1: AO0A2G5? 
226 PLAY"GGGG: D303B: G3E” 
230 PLAYCO3BAGOD4GG :， O4C103BAG3G1:， F6? 
232 PLAY%GG:， CD: G3* 
235 PLAY%EEEEECDC: E7: C6G3* 
240 PLAYGBGBGBGB，E3B1B4E1E，E6ROE2" 
245 PLAY"O5DCO4BA:，O4D3D:，E5" 
247 PLAY"D5CO4BA#G: C103B3A1:，E3G” 
250 PLAYAAAAACEGACEGCO3BAG:，A9:，A5GEFE” 
260 PLAYO3A1BO4CEAGEE，A1AABD4CO3A4: 及 6G3" 
265 PLAYO3ABO4CEGG :， B18304D3:，E6” 
267，PLAYYGG:，O3B1B，F2” 
270 PLAY"O5DCO4B 东 G: O4E5:， O2E5” 
272 PLAY%O5DCO4B#G: R3D:，E3D" 
275 PLAY“AO5CDEO4AO5CDE:，C6O3B3: C5O1B3" 
280 PLAY'CCCCCCCC: A3AA1A4，A6ROA2” 
235 PLAY"O4BBBBGGGG :， G3GDIE4，G6ROG2" 
287 IE 双 1THEN 340 
288 JIF Z=1THEN 311 
289 了 REY=ITHEN 311 
290 PLAY"O5C8R5: C8R3EIF: C8R5" 
299 了 PALETS 0，4，40，25，10 
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300 
311 
314 
320 
330 
340 
350 
360 
365 
370 
380 
385 
390 
400 
410 


Y 王 1:， GOTO 110 

PLAY?"O4C7: 0O3C7: C7” 

IF Z= 王 1THEN 330 

Z 王 1，GOTO 220 

W 王 1: GOTO 220 

PLAY"D4C7: 03C7: C7" 
PLAY"C1CCCCCCC: A3AA1A4: A6ROA2” 
PLAY"O4BBBB: O4D3D: MID3D"” 
PLAY"GGGG: DIE4:， DIMOE4” 
PLAY"O5C9: C9: C9" 

PALETS 0，8，39，39，39 

CLS 

LOCATE 11，9: PRINT"* ENDx” 
LOCATE 9，10: PRINT7THANK YOUI 
END 
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LOGO 语言 和 上门 手册 
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LOGO 语言 是 美国 麻 省 理工 学 院 人 工 智 能 实验 室 专 为 青少年 和 初学 
者 设计 的 计算 机 语言 。 它 不 同 于 传统 的 计算 机 语言 ， 它 以 孩子 们 十 分 喜欢 
的 搭 积木 拼图 的 方式 ， 通 过 海龟 在 屏幕 上 绘图 来 学 习 编 制程 序 , 训练 学 生 
的 逻辑 思维 和 创造 才能 。 目 前 , LOGO 语言 在 国外 已 十 分 流行 , 在 我 国 也 
已 成 为 中 小 学 计算 机 教学 的 内 容 之 一 ， 深 受 广大 青少年 的 喜爱 。 

LOGO 语言 的 主要 特点 是 : 简单 易学 ; 程序 具有 模块 化 结构 ， 每 个 程 
序 可 以 由 一 个 或 儿 个 相对 独立 的 模块 (过 程 ) 组 成 ,设计 方便 灵活 ; LOGO 
的 模块 一 经 定义 便 成 了 一 个 新 的 命令 ， 以 后 可 以 用 来 作为 原始 指令 调用 ， 
因此 命令 很 容易 扩充 ; LOGO 具有 BASIC 不 具备 的 递归 功能 (自己 调用 
自己 )， 可 编制 高 水 平 的 应 用 程序 ; LOGO 语言 不 仅 包括 数字 和 字符 串 ， 
还 包括 一 种 能 将 数字 和 字符 串 自 由 排列 的 表 结 构 ， 处 理 数 据 方 便 有 效 。 

本 手册 介绍 的 所 有 操作 都 已 在 裕 兴 超级 学 习 卡 所 配 的 LOGO 语言 状 
态 下 通过 。 如 您 能 愉快 地 依次 读 下 去 ， 想 来 必 能 循序 渐进 ， 学 有 所 成 。 如 
果 你 在 阅读 中 有 不 明了 的 地 方 ， 不妨 向 兄长 、 父 母 或 是 老师 请 教 一 下 。 
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一 “进入 LOGO 世界 


1.1 进入 LOGO 世界 

要 想 进 入 LOGO 世界 首先 要 明确 您 所 采用 的 超级 学 习 卡 的 版 本 ，:. 0、4 0A 4. 0C 版 本 按 F4 
键 进 入 ，5. 0 版 本 的 按 F5 键 进 入 多 功能 菜单 ， 再 按 数字 键 6 进入 LOGO 语言 状态 。5. 0 以 下 的 版 
本 ， 要 求 在 扩展 插座 上 插 有 LOGO 语言 芯片 。 经 上 述 确 认 后 , 在 学 习 机 上 播 好 超级 学 习 卡 ， 开 机 
后 按 指定 键 便 可 进入 LOGO 语言 状态 。 这 时 ， 屏 幕 被 清理 干净 , 在 屏 首 将 显示 LOGD 的 版 本 号 和 
制造 商 , 请 注意 LOGO 语言 的 版 本 号 需 同 卡 的 版 本 号 一 致 。 这 时 的 屏幕 方式 正 处 于 纯 文本 屏幕 。 

LOGO 的 屏幕 格式 有 三 种 : 

(1) 纯 文本 屏 

它 是 用 来 显示 程序 及 程序 执行 所 得 的 文字 结果 的 , 共有 25 行 ， 每 行 能 显示 28 个 字符 。 它 主要 
用 于 人 机 对 话 ， 不 能 显示 图 形 。 

(2) 纯 图 形 屏 

它 是 用 来 显示 程序 到 程序 执行 所 得 的 图 形 结果 的 ,是 体现 LOGO 优秀 绘画 能 力 的 重要 窗口 ， 
宽 256 点 ,高 240 点 ， 每 个 字符 由 8X8 个 点 组 成 。 

(3) 图 文 混合 屏 

这 是 LDOGO 使 用 对 话 式 绘图 时 使 用 的 屏幕 。 在 这 种 状态 下 ， 在 屏幕 的 底部 会 出 现 二 行文 本 ， 
用 于 显示 程序 及 程序 执行 所 得 的 文字 结果 ， 上 部 佐 旧 显示 图 形 ， 但 是 这 五 行文 本 会 遮盖 下 部 的 图 
形 。 要 想 看 到 完整 的 图 形 请 切换 到 纯 图 形 文本 屏 ， 要 想 看 到 完整 的 程序 请 切换 到 仑 文本 屏 。 

三 种 屏幕 之 间 可 以 任意 切换 ， 切 换 的 方法 是 : 按 F1 键 或 键入 TEXTSCREEN 命令 ,进入 纯 文 
本 屏 ; 按 F2 键 或 键入 SPLITSCREEN 命令 , 进入 图 文 混合 屏 ; 按 F3 键 或 键入 FULLSCRL.N 命 
令 ， 进 入 纯 图 形 屏 。 我 们 来 试 试 吧 ! 

进入 图 文 混合 屏 或 纯 图 形 屏 时 , 在 屏幕 正中 间 出 现 一 个 尖 头 朝 上 的 白色 三 角形 。 啊 哈 ! 它 就 
是 我 们 的 主角 ,大 家 都 叫 它 “海龟 ”。 它 实际 上 相当 于 一 支 画笔 ， 屏 幕 有 如 一 张 白 纸 。 我 们 可 通过 
键入 命令 或 执行 程序 来 控制 海龟 的 位 置 、 移 动 、 方 向 、 画图 和 着 色 , 在 屏幕 上 描绘 出 丰富 多 彩 的 图 
形 。 


1.2 走 吧 ! 小 海龟 ! 
我 们 先进 入 最 常用 的 图 文 混 合 屏 。 海 龟 静 静 地 趴 在 屏幕 的 中 央 ， 我 们 怎么 能 让 它 动 起 来 呢 ? 
请 键入 FD 50, 然后 按 回 车 键 。 这 时 ， 你 会 看 到 海龟 向 前 中 了 一 段 距离 , 身后 留 下 一 条 笔直 的 
轨迹 。 它 动 啦 ! 再 试 试 BK 30， 然 后 按 回 车 键 , 它 又 退回 一 段 距离 ， 真 有意思。 你 还 可 以 命令 它 走 
不 同 的 步 数 ， 海 色 的 一 步 相 当 于 屏幕 上 的 一 个 点 。 
如 FD 90 
BK70 
海龟 不 仅 会 画 直 线 ， 还 会 拐弯 呢 ! 
如 LT 30, 海 旬 就 在 当前 位 置 逆 时 针 转 过 30 度 ， 如 RT 95, 它 又 顺 时 针 转 过 95 度 ,， 再 FD 
20， 你 会 看 到 它 在 屏幕 上 斜 着 前 进 了 。 现 在 你 已 经 学 会 控制 海龟 向 前 进 或 后 退 了 。 
例 “正方 形 
FD 50 RT 90 
FD 50 RT 90 
178 


FD 50 RT 90 

FD 50 RT 90 

例 正 五 边 形 

FD 30 RT 72 
FD 30 RT 72 
FD 30 RT 72 
FD 30 RT 72 
FD 30 RT 72 

不 一 会 儿 ， 屏 幕 上 已 经 画 得 乱七八糟 了 .。 也 许 你 想 把 它们 全 控 掉 ,重新 作 图 , 那么 要 用 CS 命 
令 ; 

如 果 你 想 叫 海龟 回 到 屏 裤 中 央 但 又 不 清 屏 , 用 HOME 命令 ; 如 果 既 要 海龟 回 到 屏幕 中 央 又 要 
清 屏 , 用 我 们 上 面 提 到 的 屏幕 切换 法 就 行 ， 或 者 用 DRAW 命令: 如 果 想 退出 作 图 状态 ， 并 清除 所 
有 的 图 形 和 文字 , 要 用 ND 命令 ; 如 果 你 处 在 纯 文 本 屏幕 时 , 想 清 除 屏幕 上 的 文字 ,可 用 CLEAR- 
TEXT 命令 。 

LOGO 命令 是 由 英文 字母 组 成 的 ,有 的 命令 后 还 要 带 上 一 个 数 或 变量 ， 这 种 命令 后 面 所 带 的 
数 或 变量 ,我 们 叫 它 参 数 。 比 如 FD 等 后 面 要 带 一 个 数 或 变量 ， 如 FD 50, 注意 命 扩 与 参数 之 间 必 
须 用 空格 隔 开 , 这 一 点 要 时 刻 注 意 。 命 令 和 参数 组 成 语句 ， 语 句 是 LOGO 执行 的 最 小 单位 ， 多 个 
语句 可 导 在 同一 行内 , 语句 之 间 用 空格 隔 开 , 比如 FD 50 BK 30, 这 样 的 行 称 为 语句 行 ， 一 个 语句 
行 最 多 不 能 超过 255 个 字符 〈 包 括 空格 )， 以 回 车 结束 一 个 语句 行 。 但 我 们 不 提倡 一 行 多 句 。 如 果 
键入 的 命令 不 正确 ,LOGO 会 显示 错误 信息 ， 有 关 错 误 信息 请 查阅 附录 。 再 次 提醒 你 一 定 留 神 空 
格 !! 

好 了 ， 前面 已 经 学 了 很 多 知识 , 让 我 们 来 总 结 一 下 : 


命令 功能 

FD :;N 前 进 :N 步 

BK :N 后 退 :N 步 

RT :M 右 转 :M 度 

LT :M 左 转 :M 度 

HOME 海龟 回 到 母 位 ,但 不 清 屏 

CS 清 屏 ， 但 海龟 不 回 到 母 位 
DRAW 进入 作 图 , 海龟 回 到 母 位 ， 清 屏 
ND 退出 作 图 ， 图 文 全 清 


TEXTSCREEN 或 Fl1 进入 纯 文 本 屏 
CLEARTEXT 清除 纯 文 本 屏 
SPLITSCREEN ”或 F2 进入 图 文 混合 屏 
FULLSCREEN 吏 F3 进入 纯 图 形 屏 


命令 中 的 带 冒号 的 如 区 或 M 叫 变量 , 我 们 将 在 第 三 章 中 详细 解释 , 现在 只 需 用 有 具体 数字 取 
代 它 们 就 行 了 。 
在 纯 文本 状态 下 ,可 键入 GOODBYE 删除 一 切 ， 返回 初始 状态 。 要 想 返 回 中 西 文 浮 点 BASIC 
状态 ， 得 按 复位 键 或 是 电源 开关 。 
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1.3 四 海 为 家 
屏幕 正中 间 称 为 母 位 。 图 形 屏 上 的 每 一 点 都 要 有 一 个 名 字 , 我 们 才能 知道 海龟 处 在 什么 位 置 。 
我 们 知道 表示 平面 上 的 一 个 点 至 少 要 用 一 对 数 ， 就 是 我 们 常 听 说 的 横 坐 标 和 纵 坐 标 。LOGO 语言 
规定 图 形 屏幕 上 的 每 一 点 用 相对 于 母 位 的 横 坐 标 和 纵 坐 标 来 表示 ， 母 位 的 坐标 为 (0，0)， 向 上 
轴 最 大 的 坐标 为 十 120, 向 下 立轴 最 小 的 坐标 为 一 119, 向 右 有 X 轴 最 大 的 坐标 为 的 十 127, 向 左 有 
X 轴 最 小 的 坐标 为 一 128， 如 图 所 示 : 
十 120 
个 
一 128<A 一 十 127 
y 
一 119 
比如 有 一 点 A 坐标 为 (一 60， 一 40), 我 们 也 可 说 成 左 60 下 40。 海 龟 不 仅 能 前 进 、 后 退 和 换 弯 ,还 
能 直接 到 达 屏 幕 上 的 任意 一 点 。 请 试 以 下 命令 ， 
SETX :X 海龟 移 到 横 坐 标 为 ;:X 的 位 置 


例 SETX 0 
SETY :Y ”海龟 移 到 纵 坐标 为 :Y 的 位 置 
例 SETY 100 


SETXY :X :Y 海龟 移 到 坐标 〈:X，:Y) 的 位 置 
例 SETXY 60 40 
注意 如 果 所 用 的 坐标 为 负数 ， 那 么 在 负数 前 面 要 加 一 个 “ 供 LOGO 识别 。 
例 SETXY ”一 30 20 
SETH :H 海龟 转向 :H 度 位 置 ,其 中 海龟 头 朝 上 时 为 0 度 , 增加 度数 时 顺 时 针 方 向 转 。 
如 果 想 知道 海 色 当 前 的 位 置 , 用 以 下 命令 : 
XCOR 输出 海龟 当前 位 置 的 X 坐标 
YCOR 输入 海龟 当前 位 置 的 Y 坐标 
HEADING 输出 海龟 当前 的 方向 〈 以 度 为 单位 ) 
所 需 信息 会 出 现在 RESULT :后 面 。 
例 DRAW 
HEADING 
会 显示 RESULT :0 
再 举 一 例 : 让 海龟 从 当前 位 置 移 到 左 20 上 30 的 位 置 
SETXY XCOR 一 20 YCOR 十 30 
要 注意 这 一 节 的 命令 中 ,有 的 用 的 是 任意 位 置 ， 有 的 用 的 是 当前 位 置 ， 可 得 留神 。 
让 我 们 来 总 结 一 下 : 


命令 功能 
SETX ;X 海龟 移 到 横 坐 标 为 :X 的 位 置 
SETY :;Y 海龟 移 到 纵 坐 标 为 :Y 的 位 置 


SETXY :X :Y 海龟 移 到 坐标 〈 :X，:Y) 的 位 置 
SETH ;HH 海龟 转向 :H 度 位 置 ,其 中 海龟 头 朝 上 时 为 0 度 , 增加 度数 时 顺 时 针 方向 转 。 
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XCOR 输出 海龟 当前 位 置 的 X 坐标 
YCOR 输入 海龟 当前 位 置 的 立 坐标 
HEADING 输出 海龟 当前 的 方向 〈 以 度 为 单位 ) 


1.4， 进一步 了 解 海龟 

还 记得 如 何 画 正方 形 、 正 五 边 形 吧 , 那样 一 条 边 用 一 个 语言 行 实在 麻烦 ， 如 果 画 个 正 一 百 边 
形 ， 岂 不 要 累 死 。LOGO 提供 了 一 条 重复 指令 ,能 轻而易举 地 实现 这 些 。 

REPEAT ;N [一 组 命令 ] 
此 命令 是 将 中 括号 内 的 命令 重复 执行 :N 次 ， 比 如 画 正 方形 ， 

REPEAT 4 CFD 50 RT 90] 
画 五 边 形 ， 

REPEAT 5 CFD 50 RT 72] 

REPEAT 命令 允许 嵌 套 〈 即 一 层 里 面 又 套 一 层 )， 也 就 是 说 一 个 重复 命令 的 执行 内 容 中 允许 
包含 另 

外 的 重复 命令 。 在 使 用 嵌 套 时 ， 中 括号 要 重复 出 现 ， 如 魔 球 : 

REPEAT 10 CREPEAT 5 CFD 30 RT 72] RT 36] 

由 于 LOGO 的 基本 绘图 命 们 都 是 绘 直线 的 ,所 以 曲线 必须 用 直线 来 和 逼 近 ， 就 是 采用 细 分 的 方 
法 ， 把 曲线 看 作 是 由 很 多 很 短 的 直线 组 成 的 。 如 画 一 个 圆 ， 可 以 看 作 这 个 圆 由 360 段 线段 组 成 ,每 
画 一 段 线段 ,海龟 就 转动 1 度 , 等 把 360 段 线段 画 完 , 海 色 正 好 转 完 360 度 ， 命 令 如 下 : 

REPEAT.360 CFD 1 RT 1 

当然 , 为 了 加 快速 度 , 也 可 以 少 用 一 些 线段 来 组 成 圆 , 但 这 时 画 出 来 的 圆 弧 精度 就 不 够 了 ， 比 


REPEAT 36 CFD 10 RT 10] 

你 也 可 只 画 一 段 圆 弧 ， 只 需 改变 参数 就 行 了 。 

如 果 你 画 了 一 个 圆 ， 你 会 发 现 其 实 它 并 不 是 正 圆 ,这 是 因为 不 同 显示 器 产生 的 点 与 点 之 间 的 
横 距 离 和 纵向 距离 不 一 样 ， 为 了 弥补 这 一 不 足 ， 为 满足 人 们 的 视觉 要 求 ， LOGO 设计 了 横 纵 比 命 
令 ， 

.ASPECT :;X :X 缺 省 时 横 纵 比 为 1 

这 回 再 画 圆 ; 

.ASPECT 1.4 

LI 90 

REPEAT 360 CFD 0.5 RT 1 

显示 的 将 是 一 个 正 圆 ， 你 也 可 以 用 不 同 的 横 纵 比 产生 长 的 或 扁 的 圆 ， 试 试 吧 ! 注意 横 纵 比 命 
令 中 必须 有 那个 点 ， 那 个 点 是 命令 的 一 部 分 。 


1.5 海龟 的 特技 
键入 HT 命令 , 海 色 就 会 隐形 ,这 样 画 好 的 图 形 中 就 可 以 不 出 现 海 色 ;键入 ST, 海龟 就 又 会 
现 身 。 
如 果 有 人 让 你 用 学 过 的 命令 画 一 条 起 线 或 一 个 虚 圆 ， 你 也 许 会 感到 束手无策 吧 。 其 实 就 是 叫 
海龟 时 而 画 时 而 不 画 ， 重 复 多 次 轴 了 。 
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PU 提 笔 不 画 

PD 落笔 画 
如 虚线 REPEAT 4 CPD FD 5 PU FD 10] 
如 虚 圆 REPEAT 90 CPPD FD 2RT 2PUFD2RT2) 

例 DRAW FD 200 

这 时 ， 海龟 从 屏幕 上 方 冲 了 出 去 ， 又 从 屏幕 底部 私 了 出 来 , 这 种 现象 叫 作 卷 绕 ， 即 海龟 从 屏 
幕 的 哪 条 边界 息 出 去 了 ， 就 会 从 相反 的 那 条 边界 朴 行 回来 ， 这 种 状态 是 开机 后 默认 的 ， 也 可 用 
WRAP 命令 指定 。 在 这 种 状态 下 , 如 果 海 色 的 坐标 超出 了 范围 ， 就 会 画 出 意 想不到 的 图 形 .由 此 看 
出 海龟 的 坐标 可 以 设 定 为 LOGO 允许 的 实数 范围 中 的 任 一 实数 。 一 般 我 们 都 会 控制 图 形 的 大 小 ， 
个 让 它 出 界 , 还 可 以 使 用 NOWRAP 命令 限制 。 在 这 种 状态 下 ,海龟 不 能 走出 边界 ， 否 则 会 显示 
TUTRLE OUT OF ROUND (海龟 出 界 了 ) 。 

至 此 ， 你 已 经 能 灵活 地 控制 海龟 为 你 中 各 了 ,何不 让 家 人 一 起 分 享 你 的 快乐 呢 ! 


1.6 五 彩 缤纷 的 世界 

前 面 我 们 一 直 在 画 黑 白 图 形 ， 你 肯定 觉得 不 过 净 ,， 那么 我 给 你 介绍 几 条 彩色 绘图 的 命令 。 

PICKPEN :N 

LOGO 有 4 支 画笔 〈:N=0 一 3),， 其 中 1 一 3 号 笔 可 以 画 彩 色 图 形 ，0 号 笔 是 画 背 景色 。 

如 选用 3 号 笔 , 则 PICKPEN 3 

PC :N :X 

设 定 :N 号 笔画 的 颜色 为 :X，:;X 的 范围 是 0 一 15, 色彩 代码 表 请 见 附 录 ，:;N 的 范围 是 1 一 3。 

如 用 2 号 笔画 绿 线 , 则 PC 2 10 

BG :X 

设置 背景 颜色 ,颜色 值 :X 的 范围 是 0 一 15。 

BRIGHT :N :X 

设 定 :N 号 笔 所 画 颜色 的 亮度 , 当 从 =0 时 , 是 设置 背景 亮度 ; 当 尽 =0 时 ,为 低 亮度 ， 尺 一 
1 时 为 亮 度 。 

这 回 你 如 虎 添 受 ， 可 以 画 出 五 彩 缤纷 的 图 案 了 。 但 要 注意 ， 有 时 两 种 颜色 的 线 或 点 位 置 接近 
时 可 能 出 现 相互 干涉 而 串 色 , 因此 要 精心 安排 不 同 颜色 的 相对 位 置 . 另 外 , 也 不 要 把 背景 的 颜色 和 
画 笔 的 颜色 设置 成 一 样 的 ,要 不 屏幕 上 的 图 形 与 背景 混在 一 起 ,什么 也 看 不 出 来 了 。 真 正 的 画家 
除了 要 有 扎实 的 基本 功 ， 更 重要 的 是 要 独具匠心 。 祝 你 早日 成 为 一 名 计算 机 画家 。 


二 过 程 及 其 编辑 


2.1 过 程 入 门 

在 上 一 章 我 们 讲 的 是 交互 式 绘图 ， 即 每 画 一 次 图 形 就 必须 把 所 需 的 指令 键入 一 次 ， 想 要 再 画 
一 次 又 要 键入 一 次 。 很 多 复杂 图 形 或 组 合 图 形 的 绘制 或 运算 是 多 次 执行 一 组 或 多 组 命令 来 完成 的 ， 
这 些 成 组 的 命令 就 相当 于 BASIC 语言 中 的 程序 。 我 们 可 以 把 一 组 实现 特定 功能 的 命令 当 作 一 个 模 
块 ， 当 我 们 画 组 合 图 形 时 ， 只 需 将 这 些 模 块 合理 地 拼装 在 一 起 就 行 了 。 在 LOGO 语言 中 , 这 洋 的 
模块 有 专门 的 名 称 ， 叫 过 程 。 我 们 可 以 把 需要 的 命令 组 编写 成 过 程 一 次 性 键入 到 内 存 中 , 使 用 时 
就 不 必 反 复 键入 了 ， 只 需 键入 或 调用 相应 的 过 程 名 即 可 。 
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想 让 LOGO 明白 你 以 下 将 键入 的 命令 是 一 个 过 程 ， 就 得 先 定 义 一 下 。 定义 一 个 过 程 的 方法 如 

下 : 

在 命令 状态 下 键入 

TO 过 程 名 

比如 TO A, 这 条 命令 的 意思 就 是 通知 LOGO :“ 我 下 面 要 键入 的 一 组 命令 叫 作 过 程 A” 过 程 
名 是 由 字母 开头 的 若干 个 字母 、 数 字 组 成 , 比如 WORLD、CHINA、C3 等 等 , 请 注意 过 程 名 不 能 
使 用 LOGO 命 令 如 FD 等 , 也 不 允许 有 空格 、 括 号 或 运算 符号 , 如 A 十 、ABx C、(E2 等 。 过 程 
名 一 般 都 定义 为 顾 名 思 义 的 名 称 ， 可 以 方便 记忆 和 调用 。 


2.2 过 程 的 编辑 

假设 我 们 定义 一 个 过 程 ， 键 入 

TO A 

回 车 后 屏幕 被 清除 , TO A 出 现在 屏 首 , 这 时 处 于 编辑 状态 ， 可 将 所 要 定义 成 过 程 的 那 一 组 
命令 一 行 一 行 地 输入 , 当 一 个 语句 行 超过 屏幕 宽度 时 , 会 自动 地 在 行 尾 (屏幕 最 右 端 ) 出 现 一 个 !， 
光标 移 到 下 一 行 行 首 ， 你 可 以 继续 把 该 语句 行 输 完 。 每 输 完 一 个 语句 行 按 回 车 键 结束 。 过 程 结 尾 
都 以 -END 结束 。 

如 TO A 

REPEAT 4 CFD 50 RT 90] 

END 

在 编辑 过 程 中 ， 难 免 有 输入 错误 或 缺漏 ， 这 时 可 使 用 下 面 的 控制 键 进行 修改 。< 二 -个 ， 


移动 光标 
CTRL 一 D 删除 从 光标 位 置 的 字符 
CTRL 一 K 删除 从 光标 位 置 开 始 直 到 本 语句 行 末 的 所 有 字符 
CTRL 一 A 光标 移 至 语句 行 首 
CTRL 一 E 光标 移 至 语句 行 末 
CTRL 一 B 光标 上 移 一 屏 或 移 到 屏 首 〈 第 一 屏 时 ) 
CTRL 一 F 光标 下 移 一 屏 或 移 到 屏 末 “〈 最 后 一 屏 ) 
CTRL 一 L 将 光标 当前 位 置 的 内 容 卷 至 屏 首 


ENTER (RETURN) 在 当前 光标 处 将 语句 分 为 两 个 语句 行 。 当 光标 处 于 语句 行 首 时 , 按 此 键 
可 在 本 语句 行 和 上 一 语句 行 之 间 插 入 一 个 空 行 。 


CTRL 一 C 确认 定义 ， 退 出 编辑 。 每 次 键入 或 修改 完 一 个 过 程 之 后 都 要 键入 此 键 退出 
编辑 状态 。 
CTRL 一 G 废除 当前 的 定义 ,也 就 是 说 刚才 键入 的 和 修改 的 内 容 作废 , 保持 原 有 的 内 


容 , 然后 退出 过 程 的 编辑 状态 。 那 么 CTRL 一 C 是 怎样 的 操作 呢 ， 很 简单 ， 键 盘 左边 有 一 个 CTRL 
键 ， 你 按 住 它 不 放 , 再 按 一 下 C 键 就 行 了 , 这 就 叫 CTRL 一 C。 退 出 编辑 后 ， LOGO 自动 返回 纯 文 
本 屏 。 


2.3 过 程 的 调用 和 运行 
调用 和 运行 过 程 时 只 要 键入 过 程 名 就 可 以 了 ， 比 如 键入 上 一 节 我 们 定义 的 那个 过 程 的 过 程 名 
A,， 就 会 画 出 一 个 正方 形 。 
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在 一 个 过 程 内 ， 也 可 以 调用 其 它 已 定义 的 过 程 〈 包 括 调用 本 身 )， 这 叫 过 程 的 嵌 套 调用 。 
例 TO XYZ 
SPLITSCREEN 
HT 
A 
FD 50 
END 键入 芭 YZ, 运行 结果 是 先 画 一 个 正方 形 ， 再 画 一 条 线段 。 在 过 程 XYZ 中 , A 就 是 
顽 套 调用 的 过 程 。 


2.4 带 参 数 的 过 程 调 用 
象 正方 形 过 程 一 样 ， 有 很 多 过 程 是 公用 的 ,那么 如 何 调用 同一 个 过 程 而 画 的 正方 形 大 小 或 其 
它 性 质 不 同 呢 ? 这 里 就 要 使 用 过 程 参数 了 。 定 义 过 程 时 参数 并 不 给 出 确定 的 值 ， 而 是 在 调用 时 再 
指定 。 比 如 设 正方 形 的 边 长 为 过 程 参 数 , 那么 就 可 以 在 其 它 过 程 调用 正方 形 过 程 时 指定 参数 值 , 画 
出 边 长 不 同 的 正方 形 ， 
TO 过 程 名 进入 编辑 后 ， 按 一 下 *- 键 使 光标 回 到 过 程 名 的 后 面 闪烁 ， 然 后 键 人 空格 和 参数 名 
, 回 车 后 参数 就 设 定好 了 .这 样 一 种 定义 参数 的 顺序 比较 特殊 , 与 其 它 版 本 的 LOGO 不 太一 样 , 得 
牢 牢 记 住 ! 参数 名 由 字母 开头 后 面 带 若 干 个 字母 或 数字 组 成 , 在 过 程 中 可 以 把 这 些 参数 名 当 作 变 
量 来 引用 。LOGO 允许 定义 多 个 参数 ， 参 数 之 间 用 空格 隔 开 。 
例 定义 一 个 参数 为 边 长 世 的 过 程 
TO AL 
REPEAT 4 CFD :L RT 90] 
END 
TO A 进入 编辑 后 ， 按 一 下 <*- 键 使 光标 回 到 A 的 后 面 闪烁 ， 然 后 键入 空格 和 参数 名 L， 回 车 
后 参数 世 就 设 定好 了 。 
如 要 画 一 个 边 长 为 35 的 正方 形 , 可 在 CTRL 一 C 退出 定义 后 键入 
A 35 
过 程 也 可 以 将 一 个 运算 结果 返回 给 调用 者 ， 使 得 过 程 如 同 函 数 。 结 果 的 返回 采用 OP 命令 实 


OP :X 将 :X 返回 给 调用 者 

例 计算 2x 一 1 的 过 程 

TOCX 

OP 2x*X 一 1 

END 

注意 : 过 程 执行 中 如 遇 到 OP 命令 , 则 返回 OP 后 面 的 值 ， 就 不 再 往 下 之 执行 本 过 程 ， 所 以 
OP 命令 一 般 设 在 过 程 的 结尾 。 


2.5 条 件 语句 
在 过 程 执行 中 , 经 常 判断 某 些 条 件 是 否 成 立 , 再 根据 判断 结果 执行 下 去 。 这 样 ， 就 要 用 到 条 件 
语句 ; 
条 件 语句 有 两 种 ， 
184 


IF 条 件 表达 式 THEN 语句 1 ELSE 语句 2 

它 的 意义 是 , 如 果 条 件 表 达 式 成 立 ， 则 执行 语句 1， 否 则 执行 语句 2。 

例 IF ;X>0THEN FD 50 ELSE BK 50 

若 :X>>0,， 则 海龟 前 进 50 步 ， 否 则 后 退 50 步 。 
另 一 种 条 件 语 句 是 : 

IF 条 件 表达 式 THEN 语句 1 

它 的 意思 是 : 如 果 条 件 表 达 式 成 立 ， 否 则 执行 语句 1。 

例 IF :X>0THEN FD 50 

BK 50 

若 :X>0， 则 海龟 前 进 50 步 ， 否 则 后 退 50 步 。 

条 件 表达 式 分 为 简单 条 件 式 和 复合 条 件 式 。 

简单 条 件 式 有 : 

:;A= :B 

:A> :B 

:A< :B 

复合 条 件 有 : 

ALLOF (条 件 1) (条 件 2) 两 个 条 件 都 成 立时 复合 条 件 才 成 立 
ANYOF (条 件 1) (条 件 2) 两 个 条 件 中 只 要 有 一 个 成 立 则 复合 条 件 成 立 
NOT 条 件 只 有 条 件 不 成 立时 复合 条 件 成 立 


经 过 条 件 判断 后 ， 经 常 要 执行 如 下 指令 : 
复合 条 件 的 用 法 如 下 ; 
如 MAKE ”A5 
IF ANYOF (:A=5)(:A=4)THEN PR ?A=5 
意思 是 先 给 变量 :A 赋值 为 5， 然 后 判断 如 果 :A 一 5 或 者 :A 一 4 则 显示 A=5 


STOP 中 止 本 过 程 的 执行 
OP :;X 中 止 本 过 程 的 执行 , 将 :X 返回 给 调用 者 
TOPLEVEL 中 止 本 过 程 的 执行 ， 回 到 执行 状态 


GO ”目标 行 号 ， 跳 转 到 目标 号 指定 的 语句 行 执行 。( 注 意 标号 后 面 一 定 带 冒号 行 号 可 
-由 字母 或 数字 组 成 ,但 不 能 是 LOGO 的 命令 . 还 要 注意 行 号 后 面 一 定 要 带 有 冒号 ， 这 个 冒号 是 供 
LOGO 识别 哪个 是 行 号 用 的 。 这 个 冒号 和 我 们 上 面 提 到 的 象 :X、:M 那样 的 变量 中 的 冒号 位 置 不 
一 样 ， 它 紧 跟着 写 在 行 号 的 后 面 ， 行 号 与 冒号 之 间 不 空格 ， 冒 号 与 后 面 的 命令 之 间 要 空格 .) 
例 TO A 
10: DRAW 
20: HT 
30:FD1RT1 
GO ?30 
END 
例 TO A 
ONE: DRAW 
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TWO: HT 
LOOP1: FDIRT1I 


GO ?LOOPI1 
下 ND 
条 件 的 判断 也 可 用 测试 命令 来 实现 ; 
TEST 条件 测试 条 件 是 否 成 立 ,， 这 里 的 条 件 可 以 是 简单 条 件 ， 也 可 以 是 复合 条 件 


IFT 执行 语句 1 当 被 测试 的 条 件 成 立时 执行 语句 1 
IFF 执行 语句 2 当 被 测试 的 条 件 不 成 立时 执行 语句 2 
经 过 TEST 语句 后 ,IFT 与 FF 可 以 都 出 现 , 或 者 都 不 出 现 , 或 者 出 现 其 中 任 一 个 , 且 在 同一 
过 程 中 , 可 以 TEST 多 次 , 也 可 在 一 次 TEST 后 ， 多 次 出 现 IFT 或 IFF ， 只 是 每 次 的 IFT 或 IFF 
都 采用 最 近 执 行 的 TEST 的 结果 。TEST、IFT、IFF 这 些 语 句 之 间 可 以 插入 多 个 语句 生 
例 TEST :X>0 
IFT FD 50 如 果 :X 大 于 0 海 怨 前 进 50 步 
IFF BK 50 如 果 :X 不 大 于 0 海龟 后 退 50 步 
IFT BK 100 如 果 :X 大 于 0 海龟 再 前 进 100 步 


还 有 些 命令 或 许 对 你 有 用 : 
POTS 显示 已 定义 的 几 个 过 程 名 
PO 过 程 名 显示 指名 的 过 程 清单 
POALL 显示 所 有 过 程 的 清音 
ER 过 程 名 好 东 指名 的 过 程 
ERALL 删除 记 有 的 过 各 

2.6 递归 


过 程 可 以 相 孔 调用 ,也 可 以 自己 调用 自己 。 自 己 调用 自己 的 过 程 ， 称 为 递归 。 递归 对 于 编制 模 
块 化 的 高 水 平 豆 冶 机 分 有 用 。 它 不 仅 能 使 复杂 问题 简单 化 , 还 可 以 使 程序 有 良好 的 结构 。 
例 TO ARE2H 
REPEAT 36 “ED1RT5] 
RT 180 
ARCH 
END 
因为 是 自己 调用 首 己 ， 所 以 当 你 执行 ARCH 时 ,会 发 现 它 停 不 下 来 ,这 时 可 用 STOP 键 中 止 
正在 循环 机 行 的 过 程 。 
: 岂 归 过 程 中 加 入 条 件 语句 ， 就 能 控制 执行 的 路 线 ， 也 可 判断 是 否 应 停止 本 过 程 的 执行 ， 这 
称 为 有 条 件 递归 。 
例 TOAI 
ID :I=0THEN STOP 
FD 2CRT 21 
A :I 一 1 
END 
吉 入 条 件 判 断后 ,这 个 过 程 运 行 的 次 数 就 由 参数 工 决定 了 。 
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如 A 100， 就 是 令 过 程 A 运行 100 次 。 

参数 递归 也是 递归 中 重要 的 一 类 。 

有 人 说 , 使 用 LOGO 最 有 趣 的 莫 过 于 绘制 各 种 美丽 的 图 形 。 象 蝴蝶 对 称 的 超 莲 ， 蜗牛 壳 上 的 

旋涡 线 ,都 可 以 用 递归 来 实现 。 深 刻 体 会 递归 思想 ， 勤 于 思考 会 生发 无 尽 的 创造 。 

例 旋 吗 线 

TO SQUIRAL SIDE ANGLE 

FD :SIDE 

RT :ANGLE 

SQUIRAL :SIDE 十 2 :ANGLE 

END 

退出 定义 后 ， 你 可 以 试 试 以 下 几 组 参数 。 

SCUIRAL 0 89 

SQUIRAL 0 90 

SQUIRAL 0 91 

SQUIRAL 0 72 

SQUIRAL 0 73 

SQUIRAL 0 118 

SQUIRAL 0 119 

SQUIRAL 0 143 

SQUIRAL 0 144 

例 海星 

TO INSPI SIDE ANGLE 

HT 

FD :SIDE 

RT :ANGLE 

INSPI :SIDE :ANGLE 

END 

退出 定义 后 ， 你 可 以 试 试 以 下 几 组 参数 。 

INSPI 12 3 

INSPI ]4 5 

INSPI 15 1 

INSPI 15 2 

其 它 的 组 合 你 自己 试 试 吧 ! 

在 这 一 章 的 结尾 ， 奉 献 给 大 家 一 棵 复杂 的 递归 树 。 

TO TREE SIZE C 

IF :C=0THEN STOP 

LT 30 

FD :SIZE * 2 

TREP :SIZE :C 一 1 

BR :SIZEx* 2 
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RT 60 

FD :SIZE 

TREE ;SIZE :C 一 1 
BK :SIZE 

LT 30 

END 

退出 定义 后 ， 键 入 
DRAW 

HT 

PU 

SETY ”一 10 

PD 

TREE 15 5 


三 LOGO 的 运算 功能 


3.1 LOGO 的 数 
(1) 整数 
不 带 小 数 点 的 数 为 整数 , LOGO 能 处 理 的 整数 范围 是 一 2147483647 一 十 214783647， 如 果 超 
出 这 个 范围 ,就 把 它 转化 为 实数 。 
(2) 实数 
带 小 数 点 的 数 为 实数 , LOGO 能 处 理 的 实数 范围 是 十 10 一 38~ 士 10 十 38,， 如 果 超 出 这 个 范 
围 ， 就 会 因 溢 出 而 错误 。LOGO 的 运算 结果 只 能 输出 10 位 (包括 小 数 )， 如 果 超 出 这 个 界限 ,将 采 
用 科学 记 数 法 表示 , 即 10 的 几 次 方 用 “E” 后 带 次 方 数 表示 , 如 4X10- 13 表示 为 代 一 13。 
注意 ,如 10. 0 虽然 等 于 10, 但 10. 0 是 实数 ，10 是 整数 。 
例如 PR 4/7 
PR 400000000077 
PR 4000000000077 
PR 4/7000000000 
3.2 LOGO 的 运算 
(1) 四 则 运算 
在 LOGO 中 , 加 、 减 、 乘 、 除 分 别 表 示 为 十 、 一 、* 、/, 并 人 允许 使 用 一 层 或 多 层 圆 括号 改变 
运算 优先 度 。 
例 数学 式 3X [5 (2 一 1) 二 〈4 一 3)] 
LOGO 表达 式 3x ( (2 一 1) / (4 一 3)) 
(2) LOGO 的 变量 
在 LOGO 中 , 以 英文 字母 开头 带 有 若干 个 数字 或 字母 为 名 称 并 在 执行 过 程 中 值 可 以 改变 的 
量 叫 变量 ， 比 如 NUMBER、Al12、T 等 。 
变量 的 值 由 赋值 语句 来 定义 。 
MAKE ”变量 名 数学 表达 式 
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例 MAKE ”A 30.5 即 令 A 一 30;:5 
注意 ,赋值 语句 中 变量 名 前 必须 有 一 个 双 引 号 , 当 变 量 被 引用 时 ， 变 量 名 的 前 面 必须 带 有 冒 
号 。 
例 MAKE ”N 15 
FD :N 
运行 结果 是 海龟 向 前 走 15 步 。 
变量 赋值 后 ,还 可 以 用 赋值 语句 再 次 赋值 。 
例 MAKE ”N N 十 5 
这 是 把 N 二 5 的 值 再 赋 给 N。 
(3) 函数 
LOGO 带 有 相当 丰富 的 标准 函数 .所谓 标准 函数 ,就 是 应 用 广泛 , 使 用 方法 统一 的 函数 ,常见 
的 如 三 角 函 数 、 开 方 、 随 机 函数 等 。 别 着 急 ， 下 面 将 举例 一 一 介绍 LOGO 的 标准 函数 。 
SIN :;X 求 正 弦 函 数值 〈 :X 以 度 为 单价 ) 
例 SIN 45 
RESULT: .707106781 
COS :X 求 余弦 函数 值 〈 :X 以 度 为 单位 ) 
例 COS 90 
RESULT: 0 
ATAN :A :B 求 余弦 值 为 :A, 正弦 值 为 :B 的 角 的 度数 ， 即 反正 切 值 。 
例 ATAN01 
RESULT: 0 
SQRT :X 求 平 方 根 〈:X> 一 0) 
例 SQRT 9 
RESULT: 3 
ROUND :X 四 舍 五 入 取 整 函数 
例 ROUND 2.7 


RESULT: 3 
ROUND ”一 2.7 
RESULT : 一 3 


INTEGER::X. 截 尾 取 整 函数 
例 、 INTEGER 2:7 

RESULT: 2 

INTEGER ”一 2.7 

RESULT: 一 3 
QUOTIENT :;X :Y 商 取 整 函数 , 把 X/Y 的 商 取 整 
例 QUOTIENT 9 2 

RESULT: 4 
REMAINDER :;X :Y 余数 取 整 函数 ， 把 X/XY 的 余数 取 整 
例 REMAINDER 4.6 2 

RESULT: 1 
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RANDOM :N 随机 函数 , 产生 0 至 N 但 不 包括 N 的 正 整 数 

例 RAMDOM 100 

ASCII ”字符 ” 求 字 符 的 ASCII 码 

例 ASCII ”A 

RESULT: 65 
CHAR :N 求 ASCII 码 为 :N 的 字符 
例 CHAR 65 
RESULT :A 

函数 家 族 中 除了 标准 函数 外 , 还 有 一 类 叫 自 定 义 函 数 , 在 LOGO 中 我 们 可 以 用 定义 过 程 的 方 
法 自己 定义 一 些 常用 的 函数 。 

例 “定义 一 个 正切 函数 

TO TAN X 

OP (SIN :X) / (COS :X) 

END 

退出 定义 后 ,我 们 就 创造 了 一 个 正切 函数 。 

TAN 0 

RESULT: 0 

例 “定义 一 个 平方 函数 

TD“ 泣 

OP : 叉 * :和 

退出 定义 后 ,我 们 就 又 创 造 了 一 个 平方 函数 。 

END 

0 

RESULT: 9 

学 过 这 些 函 数 以 后 再 配合 过 程 的 运用 ， 你 就 能 进行 多 种 运算 了 ,还 能 画 很 多 种 函数 图 形 呢 ! 


字 表 处 理 


4.1 LOGO 的 字 

由 ”开头 并 以 空格 结束 的 一 串 字符 , 叫 作 一 个 LOGO 字 。 这 些 字 符 可 以 是 字母 、 数 字 和 除了 
中 括号 以 外 的 所 有 其 它 符 号 , 也 可 以 用 双 引 叶 后 马上 用 空格 结束 面 成 为 一 个 空 字 , 如 ”， 字 中 的 
每 一 个 字符 称 为 字 的 元 素 。 

例如 "YUXING、1994、.”"3* 5， 它 们 都 是 一 个 字 。 值 得 注意 的 是 , 象 1994 这 样 纯粹 由 数字 组 
成 的 字 可 以 不 用 ”开头 。 


下 面 介绍 字 的 运算 命令 : 

FIRST "” 字 取出 字 的 首 元 素 成 为 一 个 单字 符 的 字 

如 FIRST "XYZ 的 结果 为 区 

LAST 闻 取出 字 的 末 元 素 成 为 一 个 单字 符 的 字 

如 LAST >"XYZ 的 结果 为 "Z 

BF ” 字 舍 去 字 的 首 元 素 成 为 由 余下 字符 的 字 组 成 的 新 字 
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如 瑟 " 芭 YZ 网 结 标 为 “YYZ 

了 到 . " 字 舍 去 字 网 未 元 素 成 为 巾 余 下 字符 的 字 组 克 的 新 字 

如 BL ”"XYZ 蝎 绊 村 为 "区 Y 

WORD " 字 1 疗 2 把 字 1 禾 字 2 连接 起 来 形 戚 新 字 

如 WORD ”YU ”XING 网 绪 果 为 "YUXING 
4 和 2LDGO 网 求 

曲 一 对 【_ ] 揪 起 约 一 些 字 ,， 叫 作 一 但 霄 。 玫 肉 赐 字 柯 以 不 呆 呈 头 , 字 与 字 之 间 用 空格 隔 开 ， 
如 [KZYU3x*5XING]。 风 的 每 一 外 字 咖 作 霄 欧元 素 , 一 个 也 可 以 作为 易 一 个 表 的 一 个 元 素 ， 如 
r3x 5 [YU XINGD]。 裘 内 元 素 风 分 数 叫 囊 长 。 否 内 没有 元 素 品 空 表 。 

王 面 介绍 囊 网 到 算 多 令 : 

FURST [ 湾 ] 取出 琉 网 前 元 隶 

如 IEIURST [Cl994 YU XING] 由 缮 果 为 "1994 

LAST [ 琴 ] 到 出 袭 网 来 元 获 

如 ILAST Cl994 YU XING] 网 绕 累 为 "YU XIUNG 


BFC 滞 ] 合 去 否则 薪 元素 
如 BF mo994 YU XING] 的 结 昌 为 "YU XITNIG 
IPBL IC 浅 ] 舍 去 硝 网 未 元 素 


如 EL ro994 YU XING] 网 结果 为 994 YU 

REPUT 元 素 [ 液 〗 将 元 素 如 入 束 头 

如 EPUT 1994 [YU XING] 网 结 果 为 [994 YU XING] 

LPUT 元 素 ( 潜 ] 将 元 素 如 入 表 尾 

如 ILPUT ”XIHNG [1991 YU] 网 结果 为 【1994 YU XINIG] 

LIST 元 素 1 元素 2 将 两 介 元 素 组 成 一 个 表 。 

如 LIST 1994 【YU XING] 风 结 果 为 [1994 [YU XINGDD 

SE 元 素 1 元素 2 将 两 个 元 素 组 不 一 个 表 , 元素 如 为 表 ,。 则 自动 去 入 中 糙 号 , 它 网 元 素 分 别 威 
为 新 表 则 元素 。 

如 SE 1994 [YU XING] 风 结 了 栗 为 [1994 YU XING] 

有 了 这 些 字 表 处 理 命 令 , 就 可 以 很 方便 她 抒 数字、 字母 和 符号 如 你 扬 愿 她 儿 狠 在 一 起 ,并 对 
它们 进行 多 岩 网 名作 。 


五 ”输入 与 输出 
5.1 输入 
有 时 过 程 在 执行 时 需要 操作 者 动态 地 输入 一 些 信息 ， 用 来 改变 变量 的 值 或 过 程 的 运行 状态 。 
RC 等待 输入 一 个 字符 
RQ 等待 输入 一 行 字符 
例如 果 输 入 D 则 海鱼 向 前 10 步 走 
TO _ COMMAND 
MARKE ”COM RC 
了 FE :OOM=D THEN FD 10 
END 
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其 实 我 们 前 面 说 过 的 赋值 命令 也 是 输入 命令 。 
5. 2 检测 

那么 ,程序 又 如 何 判断 操作 者 是 否 已 输入 信息 是 否 符合 我 们 所 需 的 类 型 呢 ? LOGO 为 此 设计 
了 一 系列 检测 命令 。 

RC? 检测 是 否 已 键入 字符 

THING? ”A 检测 ”A 是 不 是 变量 

NUMBER? :X 检测 :X 是 不 是 数字 

WORDY? :X 检测 ;X 是 不 是 字 


LIST? :;X 检测 ;X 是 不 是 表 
TS 检测 海龟 当前 的 状态 
5. 3 输出 


输出 命令 在 任何 计算 机 语言 中 都 是 非常 重要 的 ， 它 可 以 使 操作 者 了 解 程序 完成 了 什么 工作 ， 
正在 做 什么 工作 ， 甚 至 将 要 做 什么 。 

PR 表达 式 显示 命令 。 可 以 显示 数字 、 字 母 、 符 号 、 字 和 表 , 如 果 表 达 式 是 数学 表达 式 ,那么 
它 可 以 显示 计算 后 的 结果 。 

例 PR ”A PR 15 PR CYU XING] 

PR 15x 2 

PRINT1 表达 式 紧 姿 显示。 你 可 以 比较 一 下 以 下 两 个 语句 行 的 运行 结果 有 何不 同 。 

PR ”AAA PR ”BBB 

PRINT1 ”AAA PR ”BBB 

CURSOR :X :Y 将 光标 定位 在 〈:;X,，:Y) 处 〈:;X=2 一 20 :Y=3 一 24)， 这 样 可 实现 图 文 并 


例 SPLITSCREEN 
FD 100 
CURSOR 15 10 
PR ">GAME 一 OVER 
THING ?”A ”输出 变量 ”A 的 值 
例 MAKE 吧 15 
THING ?5 
5.4 跟踪 
当 你 运行 一 个 由 很 多 语句 行 组 成 的 过 程 时 ， 往 往 想 知道 程序 已 运行 到 哪 一 句 了 , 这 时 就 需要 
下 面 这 条 命令 了 。 | 
TRACE ”这 条 命令 将 逐 行 跟踪 显示 运行 的 那 条 语句 行 的 行 号 。 
NOTRACE 停止 跟踪 
如 果 想 保留 你 键入 的 过 程 , 可 用 .SAVE 入 件 名 存 入 磁带 , 别 忘 了 按 操作 手册 连接 录音 机 , 调 
出 文件 时 用 READ ”文件 名 ， 可 参阅 《入 门 手册 》 中 有 关 录 音 机 存 调 程序 的 使 用 说 明 。 
如 果 你 可 能 用 到 打印 机 的 话 , 还 可 以 用 命令 CTRL 一 P 连接 打印 机 打印 过 程 清单 , 或 用 OUT- 
PRN 命令 打印 绘制 的 图 形 。 
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错误 信息 表 


1 PROCEURE NO FOUND 

2. VALURE NO FOUND 

3. MISS ) 

4 FUNCTION NEED MORE INPUT 

5. FUNCTION NOT LIKE IT AS INPUT 
6. NO ENOUGH STORAGE 

7. YOU NO SAY WATH TO DO WITH 
8. FUNCTION HAVE NO RETURN 

9. FUNCTION CAN ONLY BE USED IN A PROCEDURE 
10.VALURE NAME TOO SHORT 
11.ERROR IN PROCEDURE DEFINE 

12. WORLD OR LIST EMPTY 
13.FLOAT DVERFLOW ERROR 
14.FUNCTION DIDN'T OUTPUT 
15.READ ERROR 


命令 一 览 表 

一 绘图 命令 

FD :;N 前 进 :N 步 

BK :N 后 退 :N 步 

RT :M 右 转 :M 度 

LT :M 左 转 :M 度 

HOME 海龟 回 到 母 位 ， 但 不 清 屏 

CS 清 屏 ， 但 海龟 不 回 到 母 位 

DRAW 进入 作 图 , 海龟 回 到 母 位 ， 清 屏 

ND 退出 作 图 ， 图 文 全 清 


TEXTSCRENN 或 Fl 进入 纯 文 本 屏 
CLEANTEXT 清除 纯 文 本 屏 
SPLITSCREEN 或 F2 进入 图 文 混合 屏 
FULLSCREEN 或 F3 进入 纯 图 形 屏 
GOODBYE 删除 一 切 ， 返 回 初 始 状态 


未 发 现 有 此 过 程 
无 此 变量 
遗漏 右 括号 

参数 不 够 

参数 错误 

存储 空间 不 够 

不 明 错误 
函数 无 返回 值 
函数 只 能 用 于 过 程 中 
变量 名 过 短 

过 程 定 义 出 错 
字 或 表 已 空 

浮 点 计算 数值 范围 溢出 
函数 无 输出 
读 磁 带 出 错 
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SETXY :又 :Y 海龟 移 到 《〈 :X，:Y) 位 置 


SETX :又 海龟 移 到 横 坐 标 为 :X 的 位 置 

SETY :Y 海龟 移 到 纵 坐 标 为 : 立 的 位 置 

SETH :于 海龟 转向 :再度 位 置 ， 其 中 海鱼 头 朝 土 时 为 0 壮 。 增加 度数 时 上 时 针 方向 转 。 
XOOR 答 出 海龟 当前 位 置 的 和 坐标 

YOOR 葵 入 海龟 当前 位 置 的 Y 坐 标 

HEADING 输出 海鱼 当前 的 方向 《以 痿 为 剃 位 ) 


REPEAT :NT 一 组 命令 ] 将 中 括号 内 的 命令 重复 执行 和 

.ASPECT :X 设置 横 纵 比 ，:X 缺 省 时 为 1 

PICKPEN :NI 选 寿 4 支 画笔 《〈 :N 王 0 一 3)。 其 中 4 一 3 号 笔 柯 以 画 彩 色 。 

PC 区 汉 设 定 区 号 笔画 的 颜色 为 汉江 的 范围 是 0~15， 色 彩 和 代码 表 请 见 附 录 ，3N 曲 


范围 是 1 一 3。 

BG 汉 设置 背景 颜色 、 即 0 号 笔 的 颜色 ,次 的 范围 是 0 一 15。BRIGHT :N 次 设 
定 区号 笔 所 画 颜色 的 亮度 , 当 汉 一 0 时 ,是 设置 背景 亮度 ; 当 汉 一 0 时 。 为 低 亮度 。: 一 1 时 为 
离 亮 度 
二 过 程 三 念 

TO 过 程 客 定义 一 个 过 程 

END 过 程 结 旦 

< 人 移动 光标 

尼 T 委 工 一 了 删除 从 光标 位 置 的 字符 

CTRIL 一 政 删除 办 光标 位 置 开 始 查 到 本 语 和 色 行 未 的 所 有 字符 

CTRL 一 信 。 光标 移 至 请 句 行 首 

CTRL 一 五 光标 移 至 语句 行 末 

CTRL 一 如 光标 上 移 一 屏 或 移 到 翼 首 〈 第 一 屏 时 ) 

CTRL 一 王 光标 干 移 一 屏 或 移 到 翼 来 〈 最 后 一 屏 ) 

CTRL 一 工 将 光标 当前 位 置 的 了 内容 卷 至 屏 首 

ENTER (RETURN) 在 当前 光标 处 将 语句 分 为 两 个 语句 行 

CTRL 一 C 黎 认 定义 ,退出 编辑 

CTRL 一 台 废除 定义 ,退出 编 竹 

-OP 将 运算 结果 返回 给 调 形 卉 


下 条 件 表达 式 TEIEN 语句 1 ELSE 语 柯 之 如 果 条 和 件 表达 式 威 立 , 则 娄 行 请 杀 1， 本 
馈 2。 如 办 没有 ELSE 语句 2， 则 执行 十 一 悟 条 行 。 

ALLOF “条 件 17?( 条 件 2 》 两 个 条 件 中 只 有 都 威 立 时 复合 条 件 才 戚 立 

ANTYOF 《条 件 1 )〈 杂 人 御 2 》 两 人 条 和 件 中 只 要 有 一 个 戒 立 则 复合 条 件 威 立 


NOT 条 件 只 有 条 和 件 不 威 立 硅 复 合 条 和 件 成 立 

STOP > 中 于 本 过 程 的 执行 

OP :X 中 业 本 过 程 的 执行 , 将 :又 返回 给 调用 者 

TOPLEVEL 中 于 本 过 程 的 执行 ， 回 到 执行 状态 

GO "中标 行 号 : 跳 转 到 目标 号 指定 的 语 条 行 执行 。( 注 意 标 号 后 面 一 定 带 宵 号 ,， 行 号 


可 出 字母 或 数字 组 成 ， 不 能 是 命令 ) 。 
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TEST 条 件 测试 条 件 是 否 成 立 

IFT 执行 语句 1 当 被 测试 的 条 件 忒 立 时 执行 语 知 】 
IFF 执行 语句 2 当 被 测试 的 条 件 不 成 立时 执行 语 负 了 
POTS 显示 已 定义 的 几 介 过 程 客 

PO 过 程 名 显示 指名 的 过 程 清单 

POALL 显示 所 有 过 程 的 清单 

了 ER 过 程 客 删除 指名 的 过 程 

了 ERALL 删除 所 有 的 过 程 

还 算命 念 

MA 了 KE ”变量 客 数学 素 达 式 下 值 

SUN : 广 求 正 琉 画 数值 〈 : 羽 亲 为 单价 》 
OOS :又 求 余 弦 函 数 秆 《 : 驻 以 竣 为 毕 位 》 
ATAN :A :了 3 求 余 驴 条 为 : 久 , 正 孩 箱 为 : 可 的 角 锡 度数 , 即 反 正 吉 值 。 
SQRT : 双 求 平方 根 【〈 :X> 一 0) 

ROUND :X 四 舍 五 入 取 整 函数 

JNTEBGER : 习 截 是 取 整 函数 

QUOTIENT :和 : 立 衡 玛 整 函数 , 把 /Y 欧 竣 束 


REMAINDER :X :YY 余数 到 整 函数 , 把 XX]Y 弗 余 数 歌 束 


朋 ANDDOM :于 苦 袖 机 数 , 产生 0 至 N 但 不 包括 N 的 正 整 数 
ASCTIE ”字条 求 字符 的 ASCHI 码 

CHAR :N 求 ASCI 稻 为 ; N 攀 字 符 

字 素 处 理 谷 令 

FTIRST ” 字 到 出 字 的 着 元 素 式 为 一 个 单字 符 的 字 

LAST ” 字 到 出 字 的 末 元 隶 威 为 一 个 单字 符 的 字 

BF " 字 舍 去 字 网 首 元 素 碟 为 由 余 王 字符 的 字 组 成 的 新 字 
BL ” 字 舍 去 字 的 未 元 素 威 为 由 余下 字符 的 字 组 成 的 新 字 
WORD " 字 1 7? 字 3? 抒 字 1 翻 字 2 连接 起 来 形 戚 新 字 

FTRST [ 霄 ] 下 出 表 攀 首 元 素 

LAST [ 表 ] 到 出 表 灼 末 元 率 

BF [ 琴 ] 会 去 表 的 首 元 素 

BL [ 塌 ] 舍 去 表 的 未 元 素 

REPUT 元 素 【 霄 ] 将 元 素 如 入 表 头 

LPUT 元 素 [ 表 ] 将 元 素 如 入 表 昆 

LIST 元 素 1 元 素 巡 将 两 个 元 素 组 成 一 个 表 。 
SE 元 素 1 元 素 2 将 两 个 元 素 组 戒 一 个 表 , 元 素 如 为 表 , 则 自动 去 掉 中 括号 ， 它 的 


元 素 分 别 戒 为 新 表 的 元 素 。 
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五 ”输入 与 输出 命令 


RC 等 待 输入 一 个 字符 
RQ 等 待 输入 一 行 字符 
RC? 检测 是 否 已 键入 字符 
THING? ”A 检测 ”A 是 不 是 变量 
NUMBER? :X 检测 :X 是 不 是 数字 
WORDY? :X 检测 :X 是 不 是 字 
LIST? :X 检测 :X 是 不 是 表 
TS 检测 海龟 当前 的 状态 
PR 表达 式 显示 命令 
PRINT1 表达 式 紧 姿 显示 
CURSOR :X :Y 将 光标 定位 在 屏幕 的 〈(:;X，:Y) 处 〈:;X=2~20 :Y=3 一 24) 
THING ?A 输出 变量 ”A 的 值 
TRACE 逐 行 跟踪 显示 运行 的 那 条 语句 行 的 行 号 
NOTRACE 停止 跟踪 
SAVE "文件 名 ”将 文件 存 入 磁带 
READ "文件 名 将 文件 读 入 内 存 
CTRL 一 P 连接 打印 机 打印 过 程 清 单 
OUTPRN 打印 绘制 的 图 形 
色 码 表 
0 白 1 蓝 芯 紫 3 紫 4 紫红 5 粉红 6 红 7 栓 
8 黄 9 黄 绿 绿 l]1 绿 12 浅 蓝 13 灰 14 黑 15 透明 
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定价 至 15. 00 


班 : 辐 涉 . 台 
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区 而 居 ( 走 ”3 6 专 丽 疾 ( 走 ?27 7 1 


sn 直 


47 人 页 汞 (第 面 ) 丽 落 ( 著 卡 ) ”全 
7936 


“ 责 蒜 ( 走 3 


634 66” 飞 作 (1) 
hb9 92 


62 


在 药 ( 背 测 》 101 


aaammaamuaaaaoeadi aaeyemecaemaa 
114 火 奈 (1 15 1 火球 (2 119 122 车 (DJ 13 126 车 (大 2) 127 130 车 (大 1 4131 134 昔 ( 左 上 2) 135 1 和 8 车 (上 1 
140 141 144 145 148 ， 149 152 153 156 157 160 到 161 164 


上 办 


146 大 光 由 (0 141 1160 太 字 站 (2 151 164 条 手下 是 ( 左 ) 155 168 杀手 厂 星 左上 159 167 杀手 刀 旺 (上 ) 163 166 太空 船 ( 左 ) 167 


173 me 180 181 8 8 9 


17 全 太 同 (上 ) 175 178 娘 玫 (开始 ) 下 182 玫 (散发 ) 183 166“ 轧 他 ( 走 ) 
200 201 264 


让 


激 元 莹 (1) 。 状 郊 腔 (2) 。 兴 充 宁 (D) 。 涂 刘 束 (2 激光 万 (0) 者 死 万 (2 


187 190 马 人 ( 立 下 191 194 


Eee 


5 岛 (1) 203 2606 飞 旬 人 (27 267 


k- 
198 。 略 角 (2) 199 202 


各 图 形 四 角 的 号 码 为 16 进 制 ,在 SPRITE 指 令 中 人 CH 你 $ (6) 中 使 用， 


败 蛙 则 提 杀 谋 点 从 必 束 


